Delphi 11.2 released

[Uwe Raabe]

Zitat von venice2:

Aber seltsam das D11 vorher das Problem nicht erkannt hat.

Vermutlich weil lpfnWndProc letztlich ein typloser Pointer ist und somit alles mögliche zugewiesen werden kann.

Delphi-Quellcode:

TFarProc = Pointer;
...
TFNWndProc = TFarProc;
...
  tagWNDCLASSEXW = record
    cbSize: UINT;
    style: UINT;
    lpfnWndProc: TFNWndProc;
    cbClsExtra: Integer;
    cbWndExtra: Integer;
    hInstance: HINST;
    hIcon: HICON;
    hCursor: HCURSOR;
    hbrBackground: HBRUSH;
    lpszMenuName: LPCWSTR;
    lpszClassName: LPCWSTR;
    hIconSm: HICON;
  end;