Übertragung von Bildern und Sound im LAN mit 2 Rechnern

[ritzy]

Hi,
sry stand ich wohl a bissel neben mir der stream muss natürlich vorher noch auf null gesetzt werden

Delphi-Quellcode:

procedure TForm1.ServerSocket1ClientRead(Sender: TObject;
  Socket: TCustomWinSocket);
var 
stream:Tstream; 
begin 
stream:=Tstream.Create; 
serversocket1.Socket.ReceiveBuf(stream,sizeof(stream));// Es könnte sein das du hinter socket noch ne Verbindungsnummer angeben //musst sollte dann  Socket[0] sein ;)
stream.Seek(0,0);
image1.Picture.Bitmap.LoadFromStream(stream); 
end;

Probiers mal damit. p.s. du brauchst übrigens nur einen rechner um das zu testen schick es einfach an die eigene rechner-ip.
ist für testzwecke wohl bei weitem weniger aufwand.
p.s. ich habs mal in meinen Editor eingegeben

[edit=sakura] [delphi]-Tags gesetzt. Mfg, sakura[/edit]