Wenn mit ShellExecute eine Datei geöffnet werden soll, für die kein verknüpftes Programm existiert wurde bisher immer eine 31 (SE_ERR_NOASSOC) zurückgegeben. Das war jahrelang so. Nun habe ich entdeckt, dass die Funktion statt der 31 eine 42 zurückgibt (Win7, 32bit). Warum? Die Doku von MS kennt davon nichts. Kann das mal bitte jemand testen?

markieren

Delphi-Quellcode:

//uses ShellAPI
var
  FileName: string;
begin
  FileName := 'E:\blubb.xyz';
  if not FileExists(FileName) then
    MessageDlg('Datei exisitert nicht', mtError, [mbOK], 0)
  else
    showmessage(IntToStr(ShellExecute(0, nil, @FileName[1], nil, nil, 1)));
end;

Bei mir kommt auch die 42 - mit 'open' als Verb allerdings die 31.

Es ist ja auch keine Idee bei der Operation was gemacht werden soll nil, also nichts, anzugeben. Dann kann open benutzt werden, muss aber nicht. Wenn der Benutzer etwas anderes als default eingestellt hat (denn laut Doku wird das default verb dann benutzt), funktioniert es schlicht nicht.

Zitat von jaenicke:

Es ist ja auch keine Idee bei der Operation was gemacht werden soll nil, also nichts, anzugeben. Dann kann open benutzt werden, muss aber nicht. Wenn der Benutzer etwas anderes als default eingestellt hat (denn laut Doku wird das default verb dann benutzt), funktioniert es schlicht nicht.

Das einzige, was zuverlässig Dateien öffnet, ist leider "nil" als Operation. Das habe ich nach x-Jahren Support-Anrufen in der Art "Es wird nichts geöffnet" feststellen müssen. Auch in diversen Foren und Newsgroup-Post wird nil empfohlen.

Zitat von uligerhardt:

Bei mir kommt auch die 42 - mit 'open' als Verb allerdings die 31.

Danke für den Hinweis auf "open".

Zitat von BlueStarHH:

Das einzige, was zuverlässig Dateien öffnet, ist leider "nil" als Operation. Das habe ich nach x-Jahren Support-Anrufen in der Art "Es wird nichts geöffnet" feststellen müssen. Auch in diversen Foren und Newsgroup-Post wird nil empfohlen.

Stellt der Benutzer den Standard aber auf print wird dann immer gedruckt.

Wenn das nicht funktioniert, liegt das daran, dass der Dateityp das Verb open nicht unterstützt. Die meisten Dateitypen kennen das allerdings.

Zitat von uligerhardt:

Bei mir kommt auch die 42 - mit 'open' als Verb allerdings die 31.

Bei mir kommt bei nil und bei 'open' 42

Win7-64 und XE2