2

我正在研究 C++ Builder XE4 上的 AssertErrorProc。我发现delphi代码如下。

procedure AssertErrorHandler(
    const iMsg, iFilename: String;
    const iLineNo: Integer;
    const iAddress: Pointer);
var
    Err: String;
begin
    Err :=
      Format(
        '%s (%s line %d @ %x)',
        [iMsg, iFilename, iLineNo, Integer(iAddress)]);
    ShowMessage(Err);
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
    AssertErrorProc = AssertErrorHandler;
    Assert(false);
end;

我希望将上述内容转换为 C++ 代码,如下所示。

void __fastcall TForm1::AssertErrorHandler(const String iMsg,
    const String iFilename, const int iLineNo,
    const void* iAddress)

{
    String Err;

    Err = Format(L"%s (%s line %d @ %x)",
        [iMsg, iFilename, iLineNo, Integer(iAddress)]);  // E2188
    ShowMessage(Err);

}

void __fastcall TForm1::FormCreate(TObject *Sender)
{
    AssertErrorProc = AssertErrorHandler;  // E2235, E2268
    Assert(false);
}

我在编译代码时收到了两个错误。

  1. 在 Format() 语句 (E2188)

  2. 在分配 AssertErrorHandler (E2235, E2268)

我很感激我应该修改代码的任何信息。

4

1 回答 1

3

上述方法仅在 Delphi 中可用,在 C++ 中,您应该将自定义断言定义为宏:

#ifdef _DEBUG
    #undef assert
    #define assert(condition) if(!condition) assertHandler(__FILE__, __LINE__, __FUNCTION__, #condition);
#endif

void assertHandler(const char *fileName, int line, const char *function,
    const char *condition)
{
    char message[255];
    wsprintfA(message, "Assertion failed at %s line %d inside %s condition: %s",
        fileName, line, function, condition);
    ShowMessage(message);
    abort();
}

用法:

assert(myVar > 0);
于 2013-11-05T08:28:38.367 回答