Thema: Delphi Hook Frage

Einzelnen Beitrag anzeigen

core

Registriert seit: 26. Dez 2003
Ort: Wadgassen
29 Beiträge
 
#6

Re: Hook Frage

  Alt 17. Mai 2007, 16:39
Und weiter gehts

Delphi-Quellcode:
function GetOpenFileNameACallback(var OpenFile: TOpenFilenameA): Bool; stdcall;
begin
  result := true;

  OpenFile.lpstrFile := pchar('C:\test.txt');
end;
Bei dieser Variante wird der OpenDialog nicht mehr aufgerufen und der Dateiname immer auf "C:\test.txt" gesetzt. Ich müsste jetzt wissen, wie ich nach dem "result := true" eine eigene Form erzeuge. Den neuen Dateinamen von meiner Form könnte ich dann ja an "OpenFile.lpstrFile" übergeben.
Von OpenFile bekomme ich ja auch den "hwndOwner" und die "hinstance"...
  Mit Zitat antworten Zitat