|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
Как программно удалить файл?
Доброго времени суток! Возник вот такой вот вопрос...
Операционная система Windows 8.1(UAC отключен), ну думаю что 7, 8 или 8.1 особо разницы не будет... В общем программно копирую файл в c:/windows/system32/ CopyFile(PChar(dir+'\gg.dll'), PChar('C:\Windows\System32\gg.dll'), True); Скопировался туда он без проблем даже админских прав не потребовал видимо UAC отключен из-за этого, теперь пытаюсь его удалить (deleteFile('C:\Windows\System32\gg.dll')) ноль реакции файл на месте, запускал программу от имени администратора и ничего... а вот если файл на C скопировать и попробовать удалить его то нужны будут права администратора... Как его удалить из system32? путем Delphi хотелось бы но если без вариантов то можно и батом но как? |
#2
|
||||
|
||||
Цитата:
|
#3
|
||||
|
||||
GetLastError что гворит?
Пишу программы за еду. __________________ |
#4
|
|||
|
|||
Цитата:
windows x64 приложение пишу на этой же оз, приложение вроде как x32 сейчас это тестовое приложение просто тупо две строчки кода скопировать файл и удалить его... Код:
CopyFile(PChar(dir+'\123.exe'),PChar('C:\Windows\System32\123.exe'), True); (удачно) ShellExecute(Application.Handle,PChar('open'),PChar('C:\Windows\System32\123.exe'),Nil,Nil,SW_SHOW); (удачно) WinExec(PANsiChar('TASKKILL /F /IM 123.exe'), SW_HIDE); (удачно) if (deleteFile('C:\Windows\System32\123.exe')) then (не удано) ShowMessage('Well done!') else ShowMessage('ERROR CODE: '+IntToStr(GetLastError)); Цитата:
Последний раз редактировалось M.A.D.M.A.N., 19.11.2013 в 14:43. |
#5
|
||||
|
||||
Цитата:
Код:
Windows.DeleteFile('C:\Windows\System32\gg.dll'); ShowMessage(SysErrorMessage(GetLastError)); Пишу программы за еду. __________________ |
#6
|
|||
|
|||
Цитата:
вы правы выходит ошибка не удатеся найти файл но файл на месте пробовал запускать от имени администратора и менял файлы ехе и dll ниего, не находит он, от чего так? |
#7
|
||||
|
||||
Тоже ваша тема
http://www.delphisources.ru/forum/sh...ad.php?t=25347 Объяснитесь, что вы пишете, что нужен доступ к системе и скрытие от антивирусов? — Как тебя понимать? — Понимать меня не обязательно. Обязательно меня любить и кормить вовремя. На Delphi, увы, больше не программирую. Рекомендуемая литература по программированию |
#8
|
||||
|
||||
Цитата:
Цитата:
Вот например одна из ссылок на MSDN. |
#9
|
|||
|
|||
Цитата:
в той теме нужно скрытие от антивируса и я подумал что криптор будет тому решение и вообще почитайте пожалуйста ту тему тут же просто тупо я привел код из пары строк и он не работает видимо нету доступа к system32? Цитата:
никак не въеду тут ведь простое приложение которое скопировало просто файл (любой) открыло его и закрыло но удалить его не смогла так как считает что файла нету, это как понимать то? |
#10
|
||||
|
||||
Цитата:
Скомпилируй своё приложение на 64 бита - и оно будет видеть файловую систему так как она есть на самом деле, без каких либо перенаправлений. |
Этот пользователь сказал Спасибо poli-smen за это полезное сообщение: | ||
saylar_06 (19.11.2013)
|
#11
|
|||
|
|||
простым bat файлом и обычной строкой del C:\Windows\System32\123.exe вышла ошибка: Отказано в доступе! Запустив программу от имени администратора проблема была решена, хотелось бы увидеть Delphi решение этой проблемы. Может из Delphi вызвать эту команду и удалить? Будет ли этот вариант правильным?
|
#12
|
||||
|
||||
Цитата:
|
Этот пользователь сказал Спасибо poli-smen за это полезное сообщение: | ||
saylar_06 (19.11.2013)
|
#13
|
||||
|
||||
Вы правила форума то читали?
Убедите меня, что вы не пишете вредоносное ПО, ибо по обеим вашим темам можно сделать вывод, что вы как раз таки пишете вредоносный код, раз вам нужен криптор для пряток от антивируса, а здесь вы в системные папки лезете. — Как тебя понимать? — Понимать меня не обязательно. Обязательно меня любить и кормить вовремя. На Delphi, увы, больше не программирую. Рекомендуемая литература по программированию |
#14
|
|||
|
|||
Цитата:
Зачем мне кого то убеждать да ещё и в чем то? Если бы я писал вредоносное ПО я бы наверное знал как спрятаться от антивируса или пошел бы на соответствующие форумы, мне что свои сорцы выложить? Читайте внимательно моя программа видима и действия выбирает пользователь! Разве вы видели вредоносное ПО? я нет, его только антивирусы видят... Сделайте обычное приложение на дельфи которое проверит есть ли программа в автозагруке и добавит его в реест и прогоните в Avast она выдаст троян, или же поток который своими вычислениями будет нагружать процессор, то то же... К тому же я всего то интерисовался вашими мнениями на счет криптора потому что никогда им не пользовался |
#15
|
||||
|
||||
Цитата:
— Как тебя понимать? — Понимать меня не обязательно. Обязательно меня любить и кормить вовремя. На Delphi, увы, больше не программирую. Рекомендуемая литература по программированию |