Re: Delphi Example Code - WeOnlyDo Discussion board

Re: Delphi Example Code (General questions)

by Bret, Wednesday, September 07, 2005, 22:29 (7016 days ago) @ wodSupport

Excellent, Thank You!

Now, Another problem

The following fails:

var
FileName : OleVariant;
begin
wodsftp1.ListNames;
FileName := 'c:file1.txt';
wodsftp1.PutFile(FileName);
FileName := 'C:file2.txt';
wodsftp1.PutFile(FileName);
end;

What happens is file1.txt gets sent, then file1.txt gets sent again, as if FileName is not being re-set. Have tried as seperate OleVariants (FileName1,FileName2 : OleVariant), but that fails too.

Thanks again for your earlier suggestion.

Bret,

the way you use it (sequentially, line per line..) you need to set Blocking property to True and it will work. Currently component works in async way and you cannot execute methods until previous completes. Blocking should solve that. Can you try?


Complete thread: