[f00rd]

А вот если без потоков?
Например:

procedure TForm1.Button1Click(Sender: TObject);
begin
 MFTP1.Get('SomeFile.zip', 'c:\ToFile.zip');
end;