Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Frankieboy82,
21. Mai 2008
Vielen Dank nochmal!!!
Es ist das erste Mal, dass die visuelle Komponente wirklich funktioniert (ohne Zugriffsverletzungen, etc...)
Bloß wegen der Geschwindigkeit muss ich noch was ändern.
Greetz
Frankie
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Frankieboy82,
21. Mai 2008
hm, weil Die Komponente eigentlich TDosCommand heißt... ;-)
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Frankieboy82,
21. Mai 2008
Danke,
werds mir mal durchlesen!
Hier gehts nämlich wirklich um Geschwindigkeit, und ein eingefrorenes Form hattte ich schon sehr oft :(
Der Hauptcode im WorkThread ist eine repeat until Schleife, in deren Mitte SendOutput_SAHRED und deren Ende FetchInput_SHARED, aufgerufen werden.
Die Synchronisation ist da nicht so einfach...
Das letzte Mal haben sich der Main-Thread und der...
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Frankieboy82,
21. Mai 2008
Du meinst schneller vom Programmablauf her, oder vom implementieren in den Code?
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Frankieboy82,
21. Mai 2008
OK, hier mal die Implementation der beiden wichtigen Prozeduren aus TWorkThread:
procedure TWorkThread.FetchInput_SHARED;
begin
if FOwner.FInputLines_SHARED.Count > 0 then
begin
FInputLines_SHARED.Assign(FOwner.FInputLines_SHARED);
FOwner.FInputLines_SHARED.Clear;
end;