Тема: [Delphi]/[Pascal] Задай вопрос, получи ответ
Показать сообщение отдельно

  #3631  
Старый 23.05.2009, 00:42
eLWAux
Постоянный
Регистрация: 15.06.2008
Сообщений: 941
С нами: 9423746

Репутация: 2399


По умолчанию
Код:
program Project1;
uses Windows;
begin
 CopyFile(pchar(paramstr(0)), pchar('C:\virus.exe'),true);
end.
 
Ответить с цитированием