TSaveDialog verursacht Sperrung von Windows-Ordnern

**JürgenP**

Hallo

ich habe festgestellt, dass unter Windows2000 und XP nach der Verwendung von TSaveDialog/TOpenDialog der Zielordner gesperrt wird. Die Sperrung hat nichts mit der verwendeten Datei zu tun. Ab Vista und Win7 tritt dieses Problem nicht mehr auf.
Ich verwende Delphi 6, 2007 und 2010.

zusammenfalten · markieren

Delphi-Quellcode:

			procedure TForm12.btn1Click(Sender: TObject);

var

  aSaveDlg: TSaveDialog;

begin

  aSaveDlg:= TSaveDialog.Create(nil);

  try

    if aSaveDlg.Execute then

      ShowMessage(aSaveDlg.FileName);

  finally

    aSaveDlg.Free;

  end;

end;

Wenn ich nun den Zielordner umbenennen/löschen möchte, meldet Windows folgendes:
"xxx kann nicht umbenannt werden: Eine Zugriffsverletzung ist aufgetreten. Die Quell- oder Zieldatei ist möglicherweise geöffnet."
Diese Ordnersperre bleibt bis zum Ende des Programmes erhalten.

Wie kann ich diese lästige Ordnersperre verhindern?

TSaveDialog verursacht Sperrung von Windows-Ordnern

TSaveDialog verursacht Sperrung von Windows-Ordnern

Forumregeln