Audiostreaming über TCP oder UDP

[sirius]

das funktioniert nicht? Und du hast es so übernommen (x als pointer oer ppointer)?

Naja, mit Header ist es etwas anders

Delphi-Quellcode:

type PPaket=^TPaket;
     TPaket=packed record
       headerinfo1:integer; //oder sonst irednetwas,
       headerinfo2:byte;
       //...
       //können auch mehrere nichtdynamische Variablen sein
       data:array[0..0] of byte;
     end;


//Senden einer festen Paketgröße (nur Beispiel; kann auch sein, dass du es anders machen musst)
var Paket:PPaket;
    size:integer;
begin
  size:=50; //Größe der Datenpakete evtl. festlegen
  getmem(Paket,sizeof(TPaket)+size);
  stream.Read(Paket^.data,size);
  Paket^.headerinfo1:=size; //z.b.,
  //...oder was eben in den Header so alles gehört

  idudpserver1.SendBuffer('127.0.0.1',2000,Paket^,sizeof(TPaket)+size);
  freemem(Paket);
end;