Delphi-PRAXiS - Delphi Öffnen mit...

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)

- Library: Windows API / MS.NET Framework API (https://www.delphipraxis.net/20-library-windows-api-ms-net-framework-api/)

- - Delphi Öffnen mit... (https://www.delphipraxis.net/5890-oeffnen-mit.html)

Daniel B

22. Jun 2003 13:32

Öffnen mit...

Hallo,

damit wird der "Öffnen mit..." Dialog aufgerufen. Im Anhang ein Bild davon.

Delphi-Quellcode:

			procedure OpenWith(FileName: TFileName);

begin

  ShellExecute(Application.Handle,

               'open',

               PChar('rundll32.exe'),

               PChar('shell32.dll, OpenAs_RunDLL '),

               nil,

               SW_SHOWNORMAL);

end;

Grüsse, Daniel :hi:

Alle Zeitangaben in WEZ +1. Es ist jetzt 12:05 Uhr.