Noch ein zugriff auf Datei ?

[EWeiss]

Bin der Meinnug das alle Handles und threads der verwendeten Daten geschlossen sind
Trotzdem bekomme ich in "finalization" beim löschen einer Datei zugriff verweigert.

Wie kann ich vorher testen ob diese auch wirklich geschlossen ist damit
sie gelöscht werden kann?

Edit:

Prüfe mit einer Function hier aus dem Forum vorher ob es möglich ist die Datei zu löschen
es wird ein true zurückgegeben .. diese scheint nur zu prüfen ab ein generelles löschen möglich ist
aber nicht zum jetzigen zeitpunkt

Delphi-Quellcode:

    if CheckAccessToFile(FILE_DELETE, // check for generic write access
      thePath + '~tmp4358.dat')=true then;
    if DeleteFile(thePath + '~tmp4358.dat') = false then
         MessageBox(0, PChar(SysErrorMessage(GetLastError)), 'Confirm', MB_OK or MB_ICONINFORMATION);

gruss Emil