Zitat von
fit4net:
wie wandel ich diesen thread denn nun um, dass es mit dem sycronize hinhaut, ich bin da noch nicht sooooo fit????
So ähnlich:
Delphi-Quellcode:
type
TMyThread: class (TThread)
Ergebnis: String;
procedure Execute; override;
procedure VCL_Result;
end;
procedure TMyThread.Execute;
begin
// Der Threadcode
Ergebnis := 'fertig';
synchronize (VCL_Result);
end;
procedure VCL_Result,
begin
Form1.Label1.Caption := Ergebnis;
end;
P.S.
"
11"