Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > [ "Начинающим" ]
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

Ответ
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 12.12.2010, 14:20
true true вне форума
Новичок
 
Регистрация: 03.10.2010
Сообщения: 64
Репутация: 10
По умолчанию Скрыть файл и перезагрузить компьютер

вот есть код:

Цитата:
procedure TForm1.Button1Click(Sender: TObject);
var
folder: pchar;
list: pitemidlist;
begin

shgetspecialfolderlocation(0,csidl_startup,list);
new(folder);
shgetpathfromidlist(list,folder);

chdir(folder);

copyfile(pchar(extractfilepath(paramstr(0)) + 'Project1.exe'), 'Project1.exe', true);



Как сменить атрибут уже скопированного файла на "скрытый"
и если это произошло то перезагрузить компьютер?
Ответить с цитированием
  #2  
Старый 12.12.2010, 20:56
Аватар для mak-karpov
mak-karpov mak-karpov вне форума
Активный
 
Регистрация: 18.09.2008
Сообщения: 235
Версия Delphi: 2010 и 7
Репутация: 1242
По умолчанию

Ой сдается мне, что ты затеваешь что-то недоброе. Копирование себя, сокрытие файла, ребут.... Что-то мне это напоминает....
__________________
Кнопка "+" - весы в правом верхнем углу сообщения...
Ответить с цитированием
  #3  
Старый 12.12.2010, 22:47
Аватар для PhoeniX
PhoeniX PhoeniX вне форума
Always hardcore!
 
Регистрация: 04.03.2009
Адрес: СПб
Сообщения: 3,239
Версия Delphi: GCC/FPC/FASM
Репутация: 62149
По умолчанию

SetFileAttributes
ShellExecute, WinExec или CreateProcess по вкусу.
И shutdown.exe в комплекте любой винды.
__________________
Оставайтесь хорошими людьми...
VK id2634397, ds [at] phoenix [dot] dj
Ответить с цитированием
  #4  
Старый 13.12.2010, 09:00
true true вне форума
Новичок
 
Регистрация: 03.10.2010
Сообщения: 64
Репутация: 10
По умолчанию

SetFileAttributes - это не пойдет т.к файл будет занят другим процессом, просто программу хочу засунуть в автозагрузку, а перезагрузка нужна для сохранения параметро и очищения мусора
Ответить с цитированием
  #5  
Старый 13.12.2010, 09:44
Аватар для Konrad
Konrad Konrad вне форума
Эксперт
 
Регистрация: 19.03.2009
Сообщения: 1,261
Репутация: 45834
По умолчанию

Очередной вирус...


Ты что-то полезное хоть пытался написать?
Ответить с цитированием
  #6  
Старый 13.12.2010, 12:39
true true вне форума
Новичок
 
Регистрация: 03.10.2010
Сообщения: 64
Репутация: 10
По умолчанию

Если так то я не понимаю зачем этот раздел все с чегото начинали.
Ответить с цитированием
Ответ


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра
Комбинированный вид Комбинированный вид

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 12:10.


 

Сайт

Форум

FAQ

Соглашения

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2025