var
Ini: TIniFile;
begin
ftp.Host := '...';
ftp.Username := '...';
ftp.password := '...';
ftp.Connect;
if Combobox2.Text = Titel1.Caption then begin
ftp.Get('/Team/Dokumente/Dokument1.txt','Dokument1.txt'); //download
ftp.Get('/Team/Dokumente/Doku.ini','Doku.ini'); //download
//Speichern
Memo5.Lines.SaveToFile(Pfad.Text+'Dokument1.txt');
ftp.Delete('/Team/Dokumente/Dokument1.txt');
ftp.Put(Pfad.Text+'Dokument1.txt','/Team/Dokumente/Dokument1.txt',False);
Ini.WriteString('Termin1', 'Erstellt', 'Ja');
Ini.WriteString('Termin1', 'Titel', Edit8.Text);
Ini.WriteString('Termin1', 'Ersteller', GroupBox1.Caption);
Ini.WriteString('Termin1', 'Anhänge', '0');
Ini.WriteString('Termin1', 'Datum', Edit12.Text);
ftp.Delete('/Team/Dokumente/Doku.ini');
ftp.Put(Pfad.Text+'Doku.ini','/Team/Dokumente/Doku.ini',False);
end;