Hook Frage

[core]

Das funktioniert auch soweit:

Delphi-Quellcode:

{...}
function GetOpenFileNameACallback(var OpenFile: TOpenFilenameA): Bool; stdcall;
var
  test: hwnd;
begin
  OpenFile.lpstrFilter := PChar('Alle Dateien|*.*');
  result := GetOpenFileNameANext(OpenFile);

  test := OpenFile.hWndOwner;
  MessageBoxA(0, Pchar(IntToStr(test)), 'Hooked...', 0);
end;
{...}

Ich hab jetzt in allen Dialogen zum Test den Filter auf "Alle Dateien|*.*" gesetzt. Ich müsste ja nun an dieser Stelle den aufgerufenen GetOpenFileNameA Dialog mit meinem ersetzen, nur wie ...