Klassenmethode in einem Event aufrufen.

[Uwe Raabe]

Na ja, mit SetWindowLongPtr(Result, 0, NativeInt(Self)) speicherst du die Instanz im Windows-Handle. Dann kannst du sie auch über GetWindowLongPtr(fWnd, 0) wieder herausholen:

Delphi-Quellcode:

function MsgWndProc(fWnd: HWND; fMsg: UINT; fWParam: WPARAM; fLParam: LPARAM): LRESULT; stdcall;
begin
  Result := 0;
  if (fWParam = kzHotkeyID) then
  begin
    MessageBox(0, 'Hotkey', 'Hotkey', MB_OK); // nur um zu sehen ob ich im Hotkey bin
    TkzScreenShot(GetWindowLongPtr(fWnd, 0)).Shot;
    Result := 1;
  end
  else
    Result := DefWindowProc(fWnd, fMsg, fWParam, fLParam);
end;