Indy 10 - Progressbar arbeitet nicht mehr mit OnWork

[Meflin]

Zitat von hsbc:

Delphi-Quellcode:

procedure TF_Test.IdFTP1WorkBegin(Sender: TObject;
  AWorkMode: TWorkMode; const AWorkCountMax: Integer);
begin
  ProgressBar.Max := BytesZuSenden;
end;

Ich würde jetzt mal spontan sagen das muss nicht BytesZuSenden sondern AWorkCountMax heissen... Ansonsten: was soll das bitteschön sein, das ByteszuSenden