[DarkMoth]

Суть куска программы:
Содержимое memo сохранить в файл, файл залить на ftp, удалить локальный файл.

код

Код:

procedure Form.sendClick(Sender: TObject);
   begin
     begin
       if idftp1.Connected then
        begin
         idftp1.ChangeDir('as');
         memo1.Lines.SaveToFile(TPath.Combine(TPath.GetSharedDocumentsPath, 'test.txt')) ; //сохранили локально
         if FileExists(TPath.Combine(TPath.GetSharedDocumentsPath, 'test.txt')) then //проверили наличие
           begin
            idftp1.Put(TPath.Combine(TPath.GetSharedDocumentsPath, 'test.txt')) ;  //отправили
            deleteFile(TPath.Combine(TPath.GetSharedDocumentsPath, 'test.txt')) ;   //грохнули
            memo1.Lines.Clear;
            idftp1.Disconnect;
           end;
        end;
     end;
   end;

Вопрос. Можно ли сделать сохранение сразу на сервак, без локального файла?