Wie kann ich erfahren das Windows etwas löschen will

[Fox Mulder]

Sendet Windows eine Messege wenn eine User eine Datei löschen will ?
Wenn ja wie kann ich diese Message abfangen und so manipulieren , dass Windows das löschen abbricht ?
Ich wäre dankbar für eine Antwort !!!!!

[Andreas Kosch]

Hallo,

zusammen mit Delphi (3/4/5) wird im Verzeichnis <i>Borland\Delphi5\Demos\Activex\Shellext</i> als Beispielprojekt ein <b>Copy-Hook-Handler</b> (COM-Objekt) ausgeliefert, der im System registriert werden kann. Ist er "scharf", wird er von bestimmten Operationen informiert und darf zusätzliche Schritte abarbeiten oder sogar sein Veto einlegen. Der wichtige Teil verbirgt sich hinter den folgenden Zeilen:
<pre>
function TCopyHook.CopyCallBack(Wnd: HWND; wFunc, wFlags: UINT; pszSrcFile: PAnsiChar;
dwSrcAttribs: DWORD; pszDestFile: PAnsiChar; dwDestAttribs: DWORD): UINT;
// This is the method which is called by the shell for folder operations
const
ConfirmMessage = 'Are you sure you want to %s ''%s''?';
var
Operation: string;
begin
case wFunc of
FO_COPY:
Operation := 'copy';
FO_DELETE:
Operation := 'delete';
FO_MOVE:
Operation := 'move';
FO_RENAME:
Operation := 'rename';
else
Operation := 'continue this operation on'
end;

// confirm operation
Result := MessageBox(Wnd, PChar(Format(ConfirmMessage, [Operation, pszSrcFile])),
'Delphi CopyHook Shell Extension...' , MB_YESNOCANCEL);
end;
</pre&gt