IdFTP AWorkCountMax = 0

[Daradon]

Hi

Ich versuch mich gerade an einem kleinen ftp programm
Download usw funktioniert schon, nur ich habe hier das problem das
AWorkCountMax immer 0 ist.. mache ich irgendetwas beim verbinden falsch ? oder brauch ich ein list um die dateigröße zu erfahren ?

Delphi-Quellcode:

procedure TForm1.IdFTP1WorkBegin(Sender: TObject; AWorkMode: TWorkMode;
  const AWorkCountMax: Integer);
begin
ProgressBar1.Max := AWorkCountMax;
ProgressBar1.Position := 0;
Label12.Caption := IntToStr(AWorkCountMax div 1024);
Application.ProcessMessages;
end;

noch ne kleine frage:
Wie kann ich ambesten während eines transfers den transfer sauber abbrechen ?