Einzelnen Beitrag anzeigen

Vader

Registriert seit: 6. Mai 2003
804 Beiträge
 
Delphi 6 Enterprise
 
#1

TMemorystream Server<>Client !

  Alt 9. Apr 2004, 18:29
hallo,

hab da einen code der auf einen serverpc läuft,der den inhalt von einen treeview in ein tmemorystream läd und dann über den socket den client
sendet.

server

Code:
procedure TForm1.FormCreate(Sender: TObject);
Var
  Mem : TStream;
begin
  Mem := TMemoryStream.Create;
  Try
    TreeView1.SaveToStream(Mem);
    Mem.Position := 0;

    // hier deinem Socket sagen er soll es senden
    ServerSocket1.Connections[0].SendStream(Mem);
  Finally
    Mem := Nil;
  End;
end;
jetzt möchte ich gerne das ich den stream wieder in ein treeviw auf den
clientpc reinlade, aber da steh ich an.
kann mir irgenwer einen bißchen code posten.



mfg vader
  Mit Zitat antworten Zitat