Wie kann geprüft werden ob ShellExecute

[HPB]

Guten Tag Delphianer,
ich schreibe eine Datei mit TFileStream auf die Platte.
Dies gelingt auch gut.
Danach öffne ich die Datei mit ShellExecute.
Das gelingt auch.
Nach dem ich Datei anzeigt und geschlossen habe, möchte ich sie wieder löschen.

Mit diesem Code wird nicht mal das Bild angezeigt:

Delphi-Quellcode:

   
pSchreibeStream := TFileStream.Create(pSchreibeDatei, fmCreate);
    dtmdMain.dokumenteDOKUMENT.SaveToStream(pSchreibeStream);
pSchreibeStream.Free;

   ShellExecute(Handle, 'open', PChar(pSchreibeDatei),
      nil, nil, SW_SHOWNORMAL);
  DeleteFile(pSchreibeDatei);

Wenn ich die Zeile: DeleteFile(pSchreibeDatei); Enable dann wird die Datei angezeigt.
Aber wann kann ich sie wieder von der Platte löschen?


Mit Gruß HPB