Shellapi beendet Programm

[Larsi]

Hi,
ich habe in meinem Programm eine Funktion der Shellapi verwendet. Mit Shellexecute öffne ich einen Ordner im Windows Explorer. Das hat bis gestern auch noch super geklappt aber wenn ich jetzt die Funktion, die den Ordner aufrufen soll aufrufe, dann beendet sich mein Programm ohne irgendeine Fehlermeldung. Neues Projekt erstellen kommt nicht in Frage. Wisst Ihr weiter? Hier die Funktion (ist hier aus der Dp):

Delphi-Quellcode:

procedure ShowFolder(Folder: string);
begin
  ShellExecute(Application.Handle, PChar('open'), PChar(Folder), nil, nil, SW_SHOWNORMAL);
end;

Mit freundlichen Grüßen

Lars Wiltfang