Mit IndyKomponente Datei senden

[freak4fun]

hallo,

ich hab mir eienen chat gebaut (nur 2 chatter über ip - beide server und client) und kann texte senden und empfangen. nun will ich aber auch dateien senden, hab aber keine ahnung wie das geht.

bin dankbar für jeden hinweis, tutorial, oder anregung

mfg
freak

[Elite]

Du splittest deine Datei in Stücke à z.B. 20KB, reservierst dir Speicher auf dem Heap, legst nachheinander deine Dateifragmente da rein, verschickst sie über SendBuffer und baust sie auf der andren Seite wieder zusammen. Ich meine mit Client-, Serversocket ist das Splitten nicht mal nötig.

[freak4fun]

hallo,

ja, ne

clint-server-socket-dingens hab ich nicht glaub ich.

aber ich hab das versucht: Delphi-Source.de und dort hab ich dei Datei 'Teststream.Date' durch 'Spiel.exe' (um die 300kB)ersetzt Da ist mir doch glatt der Firmenrechner abgeschmiert und alle Daten wech.
naja nicht weiter schlimm aber wie geht des nun
nochmal server 'grillen' dürfte nicht drin sein

mefg
freak

[Birzenbae]

die müssten doch eigentlich unter 'Internet' stehn und falls nich kann es sein das du die nachinstallieren musst, hab keine ahnung wie das bei Delphi 6 is, weiss nur, dass man in Delphi 7 die noch nachinstallieren musste.

[freak4fun]

hallo,

ich machs jetzt über indy mit TCPClient.WriteFile nur wie sie wieder ausgebe weiss ich noch nicht so genau, denn es gibt anscheinend kein ReadFile

mfg
freak

[maxk]

Das Problem ist, dass die Gegenseite wissen muss, wie groß die Datei ist, die empfangen werden soll. Wenn sie das weiss, kannst du so arbeiten:

Delphi-Quellcode:

var FS:TFileStream;
begin
 FS:=TFileStream.Create('C:\Test.txt',fmCreate);
 try
  idTCPClient1.ReadStream(FS,Dateigroesse);
 finally
  FS.Free;
 end;
end;

Du musst also vor dem Senden der Datei deinem Client mitteilen, wieviel auf ihn zukommt. Sonst weiss er nicht, wann er aufhören soll Daten zu sammeln. Alternativ kannst du auch eine zweite Verbindung öffnen (vgl. FTP) und über diese die Datei übertragen - das hätte den Vorteil, dass man während der Übertragung weiterchatten kann.

Gruß,
maxk

[freak4fun]

ja ne
ich werd ma gucken ...

thx for help

mfg
freak