Zitat von
sx2008:
Zitat von
Ruio:
Und zu array[0..999999] of Char;
Ein Dynamisches Array ging da nicht und weil ich nocht weiß wie viel da mal versendet wird ist das erstmal 999999 groß.
Das geht doch eleganter und resourcensparender mit SetString():
Delphi-Quellcode:
procedure Tt4rCore.ReceiveAppMessage(var Msg: TWMCopyData);
var
sText: string;
begin
...
SetString(sText, Msg.CopyDataStruct.lpData, Msg.CopyDataStruct.cbData); // Daten in String kopieren
ReceiveAppMessageCallback(Sender,Action, sText);
end;
Danke!
Das kommt davon, wenn man noch nicht weiß, was der Code überhaupt macht.
Nur leider bleibt die
AV:
Zitat:
---------------------------
t4rappdemosatellite
---------------------------
Zugriffsverletzung bei Adresse 00457C53 in Modul 't4rAppDemoSatellite.exe'. Lesen von Adresse 00000000.
---------------------------
OK
---------------------------