Ich hab mir mit xampp einen Server am Computer erstellt. Ich würde gerne dieses Stück Code verwenden:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
MemStream: TMemoryStream;
begin
MemStream := TMemoryStream.Create;
try
Memo1.Lines.SaveToStream(MemStream);
MemStream.Position := 0;
with IdFTP1
do
begin
Host := '
ftp.MyFtpServer.de';
Username := '
MyUsername';
Password := '
MyPassword';
Passive := True;
TransferType := ftASCII;
Connect(True, 3000);
if Connected
then
begin
Put(MemStream, '
MyFile.txt');
Disconnect;
end;
end;
finally
MemStream.Free;
end;
end;
Es gibt immer einen Fehler bei "IdFTP1"
Ich benutze Delphi 7 Personal.
Wegen
INDY-Versionen hab ich keine Ahnung. Ich bin Anfänger.