AW: Windows 10: Im "Öffnen mit Dialog" fehlt der Haken für Standardanwendung
Hallo,
hier ist ein Link, allerdings nicht für Delphi. http://stackoverflow.com/questions/2...-windows-8-8-1 |
AW: Windows 10: Im "Öffnen mit Dialog" fehlt der Haken für Standardanwendung
Zitat:
Delphi-Quellcode:
procedure TForm1.Button10Click(Sender: TObject); var FN: String; begin //Systemsteuerung\Alle Systemsteuerungselemente\Standardprogramme\Standardprogramme festlegen FN:='/name Microsoft.DefaultPrograms /page pageDefaultProgram'; ShellExecute(0,nil,PChar('control.exe'),PChar(FN),'',SW_SHOWNORMAL); end; procedure TForm1.Button11Click(Sender: TObject); var FN: String; begin //Systemsteuerung\Alle Systemsteuerungselemente\Standardprogramme\Dateizuordnungen festlegen FN:='/name Microsoft.DefaultPrograms /page pageFileAssoc'; ShellExecute(0,nil,PChar('control.exe'),PChar(FN),'',SW_SHOWNORMAL); end; procedure TForm1.Button1Click(Sender: TObject); var FN: String; begin FN:='/name Microsoft.DefaultPrograms'; //Systemsteuerung\Alle Systemsteuerungselemente\Standardprogramme\ ShellExecute(0,nil,PChar('control.exe'),PChar(FN),'',SW_SHOWNORMAL); end; // oder: procedure TForm1.Button2Click(Sender: TObject); var FN: String; begin FN:='shell:::{17cd9488-1228-4b2f-88ce-4298e93e0966}'; //Systemsteuerung\Alle Systemsteuerungselemente\Standardprogramme\ ShellExecute(0,nil,PChar('explorer.exe'),PChar(FN),'',SW_SHOWNORMAL); end; |
AW: Windows 10: Im "Öffnen mit Dialog" fehlt der Haken für Standardanwendung
@hoika,
danke für den Link! :thumb: Das muss ich mir anschauen wenn ich etwas mehr Zeit habe. @t.roller , danke für deine Hilfe!:thumb: Direkt der erste Aufruf scheint das zu sein was meinem Wunsch am nächsten kommt. Euch einen schönen Abend! :dp: |
Alle Zeitangaben in WEZ +1. Es ist jetzt 04:57 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz