[f00rd]

RaZEr

procedure TForm1.Button1Click(Sender: TObject);
var
 DFile:TFileStream;
begin
 DFile:=TFileStream.Create('ToFile.zip', 0);
 idFTP1.Get('SomeFile.zip', DFile);
 DFile.Free;
end;