Forum: Object-Pascal / Delphi-Language
Delphi
by C0pa,
3. Jun 2010
Habe mir eine Funktion jetzt geschrieben:
function bufferToString(var Buf; Len: Integer): String;
var
a: array of Byte;
i: Integer;
begin
SetLength(a, Len);
for i := 0 to Len do
a := PByte(Cardinal(@pchar(buf)) + i)^;
Forum: Object-Pascal / Delphi-Language
Delphi
by C0pa,
3. Jun 2010
Ola
function callbackSendTo(s: TSocket; var Buf; len, flags: Integer; var addrto: TSockAddr; tolen: Integer): Integer; stdcall;
Das ist meine SendTo Methode, jetzt möchte ich den Inhalt von Buf als String zurück gegeben bekommen.
Derzeit mache ich das so:
var s: String;
s := PChar(@Buf);