Asoo!
Jetzt versteh ich dich.
Klingt ja schonmal einfacher, als das mit den Threads.
Erzielt man mit dieser Methode denn auch vegleichbare Ergebnisse?
Habs jetzt mal so gemacht, funzt auch (danke
):
Delphi-Quellcode:
procedure TForm1.IdFTP1Work(Sender: TObject; AWorkMode: TWorkMode;
const AWorkCount: Integer);
begin
BtFileUpload.Enabled:=False;
try
Application.ProcessMessages;
finally
BtFileUpload.Enabled:=True;
end;
end;