Problem mit Datei-Property-Dialog

[n0b0dy]

hi,

ich möchte gerne den Windows-Eigenen-Datei-Property-Dialog anzeigen lassen, was soweit eigentlich auch klappt...habe nur das problem, dass wenn der dialog einmal angezeigt wurde, das programm nicht geschlossen wird. also wenn ich den dialog nicht anzeigen lasse lässt sich das programm problemlos beenden. lasse ich ihn jedoch nur einmal anzeigen lässt sich das programm nicht beenden. die form verschwindet, aber der prozess läuft weiter. habe den Dialog folgendermaßen aufgerufen:

Delphi-Quellcode:

uses
  ShellAPI;

procedure ShowPropertyDialog(FileName:String);
var
  info: ShellExecuteInfo;
begin
  FillChar(info, SizeOf(info), 0);
  info.cbSize := SizeOf(info);
  info.fMask  := SEE_MASK_INVOKEIDLIST;
  info.lpVerb := 'properties';
  info.lpFile := PChar(filename);
  ShellExecuteEx(@info);
end;

kann mir jemand behilflich sein?

Grüßle