TIdFTP mit TProgressBar verbinden

28. April 2007

long dlsize=IdFTP1->Size(“filename”);

void __fastcall TForm1::IdFTP1WorkBegin(TObject *Sender, TWorkMode AWorkMode, const int AWorkCountMax)
{
if (AWorkCountMax > 0)
{
ProgressBar1->Max=AWorkCountMax;
}else
{
ProgressBar1->Max=dlsize;
}
}

Ähnliche Beiträge:

Schlagworte:

, , , , ,

Schreibe ein Feedback!



* Alle gekennzeichneten Felder sind Pflichtangaben.