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 ...
