Как удалить файл после перезагрузки Windows?
01.01.2007
Я использую функцию, которая заносит в ключ реестра RunOnce командную строку:
command.com /c del C:\Путь\Имя_файла
Взято с Vingrad.ru https://forum.vingrad.ru
В wininit добавляешь строку NUL={ПУТЬ УДАЛЯЕМОГО ФАЙЛА}
Взято с Vingrad.ru https://forum.vingrad.ru
Еще есть способ через реестр:
uses Registry; procedure DeleteFileOnRestart (const FileName : String); var Reg : TRegistry; begin Reg := TRegistry.Create; Reg.RootKey := HKEY_LOCAL_MACHINE; Reg.OpenKey ('Software\Microsoft\Windows\CurrentVersion\RunOnce', False); Reg.WriteString ('Selfdel9x','command.com /C del "' + FileName + '"'); Reg.WriteString ('SelfdelNT','cmd /C del "' + FileName + '"'); Reg.CloseKey; Reg.Free; end;
Тут две команды добавляются, т.к. на XP с command.com не рабоает...
Одна из них сработает, а другая пройдет в холостую...
Взято с Vingrad.ru https://forum.vingrad.ru