JCL を Delphi 2010 にインストールしました。次のコードでは
try
raise Exception.Create('Error Message');
except
on E: Exception do
begin
ResultStatus := JclLastExceptStackListToStrings(sl, True, True, True, True);
end;
end;
また、初期化セクションに次の呼び出しがあります。
initialization
JclStartExceptionTracking;
ResultStatus は false で、sl は空です。マップと .jdbg ファイルを生成するオプションを設定しました。ProcByLevel などの他の関数は問題なく動作します。JclLastExceptStackListToStrings を機能させるために他に何かする必要がありますか?
JclDebug.pas ファイルから:
最終更新日: $Date:: 2010-09-07 19:43:19 +0200 (2010 年 9 月 7 日 3 月) リビジョン: $Rev:: 3331