Ich logge in meinem Programm vieles.
Nun gibts es bei an einer Bestimmten Stelle ein Problem damit.
Stelle:
Delphi-Quellcode:
procedure Tt4rCore.ReceiveAppMessage(var Msg: TWMCopyData);
var
sText: array[0..999999] of Char;
SenderAndAction,Action,Sender: String;
begin
SenderAndAction := '0000'+IntToStr(Msg.CopyDataStruct.dwData);
Log(SenderAndAction,T4R_LOGLEVEL_INFOS);
Action := Copy(SenderAndAction,Length(SenderAndAction)-3,2);
Sender := Copy(SenderAndAction,0,Length(SenderAndAction)-3);
StrLCopy(sText, Msg.CopyDataStruct.lpData, Msg.CopyDataStruct.cbData);
ReceiveAppMessageCallback(Sender,Action, sText);
end;
Der Debugger zeigt eine
AV bei dem hier an:
Delphi-Quellcode:
if (Loglevel<=FErrorLogLevel) then
ErrorLogWrite(LogFlag, Msg);
FErrorLogLevel wird am Anfang gleich festgelegt und sollte verfügbar sein. Beim weiteren Nachforschen habe ich festgestellt, dass der Debugger bei FErrorLogLevel WErt nicht verfügbar anzeigt.