Thema: Delphi FTP ohne Indy?

Einzelnen Beitrag anzeigen

Benutzerbild von Net7
Net7

Registriert seit: 22. Jun 2004
Ort: Lauenburg
161 Beiträge
 
Delphi 7 Professional
 
#16

Re: FTP ohne Indy?

  Alt 2. Nov 2005, 23:08
Hmm ... warum alles so schwer machen.
Wie ripper8472 schon sagte... "mach es zu Fuß".
also..

Mit FTP kommunizieren ist simpel.

Delphi-Quellcode:
procedure TForm1.Button2Click(Sender: TObject);
begin
clientsocket1.Active:=true;
end;

procedure TForm1.Button3Click(Sender: TObject);
begin
clientsocket1.Active:=false;
end;

procedure TForm1.ClientSocket1Read(Sender: TObject;
  Socket: TCustomWinSocket);
var
test:string;
begin
       test:=clientsocket1.Socket.ReceiveText;
        memo1.Lines.Add(test);
end;

procedure TForm1.Button1Click(Sender: TObject);
var
nachricht:string;
begin

        nachricht:=edit1.Text+char(13);
        edit1.Clear;
        clientsocket1.Socket.SendText(nachricht);
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
  edit1.Clear;
end;

end.
dazu noch etwas davon

FTP Funktionen

und schon kanns losgehen.

//edit und das mit "Sockets"
Marko
So`ne Atombombe kann einem den ganzen Tag verderben!
Eine eigene DLL in C++ geschrieben wird meist ein Sklave für mein Delphi/Pascal.
  Mit Zitat antworten Zitat