Hallo zusammen...
Ich versuche derzeit wie folgt ein Bild über UDP zu versenden:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
stream:TMemoryStream;
Data:TBytes;
begin
if OpenDialog1.Execute then begin
stream := TMemoryStream.Create;
stream.LoadFromFile(OpenDialog1.FileName);
stream.Position := 0;
showmessage(inttostr(stream.Size));
SetLength(Data,stream.size); //size ist bei meinem bild ca 76000
stream.ReadBuffer(Data[0],stream.size);
IdUDPClient1.sendbuffer('127.0.0.1',1234,Data);
end;
end;
Ich bekomme jedoch immer die Meldung
Gibt es eine Möglichkeit auf direktem wege mehrere MegaBytes mittels idUDP zu versenden?
Oder muss ich das manuell aufteilen und wieder zusammensetzen?