Hi,
danke für die Tips, auch mit dem Delphi-Code, bin im Forum halt neu und außerdem kasser Delphi-Neuling. Jetzt habe ich in einem anderen Beitrag gelesen, dass ich beim AntiFreeze den Wert onlywhenidle auf false stellen muß. Das Formular friert nicht mehr ein, aber mein ProgressBar zeigt immer noch nichts an. Was mache ich flasch?
Delphi-Quellcode:
procedure TForm1.IdFTP1WorkBegin(Sender: TObject; AWorkMode: TWorkMode;
const AWorkCountMax: Integer);
begin
ProgressBar1.Max := AWorkCountMax;
ProgressBar1.Position := 0;
end;
procedure TForm1.IdFTP1Work(Sender: TObject; AWorkMode: TWorkMode;
const AWorkCount: Integer);
begin
ProgressBar1.Position := AWorkCount;
end;