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