[DUG] Indy FTP OnWork event

[Robert martin]

Hi

What version are you using?  I have used an older Indy 10 and the 
slightly newer version that comes with D2007 and in both cases the event 
fires correctly.  I was working with it yesterday !

Rob Martin
Software Engineer

phone +64 03 377 0495
fax   +64 03 377 0496
web www.chreos.com

Wild Software Ltd



Mike Stokes wrote:
> Thanks for that.
>
> The only problem is that the OnWork event does not fire at all when 
> using the TIdFTP component for file uploads.
> It does however work for file downloads.
>
>
> All the best,
> Mike Stokes
>
> Alister Christie wrote:
>> Try something like
>>
>> in OnWorkBegin:
>>  pFileProgress.Position := 0;
>>  pFileProgress.Max := aWorkCountMax;
>>  pFileProgress.Visible := TRUE;
>>
>> in On WorkEnd:
>>  pFileProgress.Visible := FALSE;
>>
>> in OnWork:
>>  pFileProgress.Position := AWorkCount;
>>  Application.ProcessMessages;  (or UpdateWindow(Handle) or similar)
>>
>> Alister Christie
>> Computers for People
>> Ph: 04 471 1849 Fax: 04 471 1266
>> http://www.salespartner.co.nz
>> PO Box 13085
>> Johnsonville
>> Wellington
>>
>>
>> Mike Stokes wrote:
>>> Hello everyone.
>>>
>>> I have just started using the Indy FTP component as I need to be 
>>> able to uploads onto a Linux box from a Delphi application.
>>>
>>> I am having trouble getting the Indy TIdFTP component's OnWork event 
>>> to fire when I use the “put” method to upload a file.
>>> It seems to work fine when I use the “get” method to download a file.
>>>
>>> All I am wanting is to be able to update a progress bar to show how 
>>> much longer the upload is going to take.
>>>
>>>
>>> All the best,
>>> Mike Stokes
>>> _______________________________________________
>>> NZ Borland Developers Group - Delphi mailing list
>>> Post: delphi at delphi.org.nz
>>> Admin: http://delphi.org.nz/mailman/listinfo/delphi
>>> Unsubscribe: send an email to delphi-request at delphi.org.nz with 
>>> Subject: unsubscribe
>>>
>>>
>>
>>
>>
>
> _______________________________________________
> NZ Borland Developers Group - Delphi mailing list
> Post: delphi at delphi.org.nz
> Admin: http://delphi.org.nz/mailman/listinfo/delphi
> Unsubscribe: send an email to delphi-request at delphi.org.nz with 
> Subject: unsubscribe
>