Wert aus Klasse nicht verfügbar

[Ruio]

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
---------------------------