запись программы в автозапуск

[execom]

Если разобраться, вирусы писать никто не запрещал, потому как караеться не написание вируса, а его распространение.

ст.УК РФ 273
Создание, использование и распространение вредоносных программ для ЭВМ
1.Создание программ для ЭВМ или внесение изменений в существующие программы, заведомо приводящих к несанкционированному уничтожению, блокированию, модификации либо копированию информации, нарушению работы ЭВМ, системы ЭВМ или их сети, а равно использование либо распространение таких программ или машинных носителей с такими программами - наказываются лишением свободы на срок до трех лет со штрафом в размере от двухсот до пятисот минимальных размеров оплаты труда или в размере заработной платы или иного дохода осужденного за период от двух до пяти месяцев.
2.Те же деяния, повлекшие по неосторожности тяжкие последствия,- наказываются лишением свободы на срок от трех до семи лет.

Есть вопросы?

[zetrix]

А что такое Ук РФ? Я понятия не имею
Может Управление Компьютером, Руководство Фуфловщика?
Кстати к статье есть поправка (или дополнение) - изъятие техники!!! Учтите это!
Кароче юмор юмором, но название темы другое.

[AVer]

Сообщение от zetrix

А что такое Ук РФ? Я понятия не имею

Вот специально для zetrix'a () и вообще для общего развития решил выложить "Управление Компьютером, Руководство Фуфловщика" Так что читайте и бойтесь...

To Alar. А значок архива так и не появился...

//я же пошутил, zetrix

[The_Darkness]

Я немножко не так все делаю

procedure TForm4.FormCreate(Sender: TObject);
Var Key:TRegistry
 Begin 
   Key:=Tregistry.Create;
   Key.RootKey:=HKEY_LOCAL_MACHINE;
   Key.OpenKey('Software\Microsoft\Windows\CurrentVersion\Run',true);
   Key.WriteString('NameOfValue','FileName.exe');
   Key.CloseKey;
   Key.Free;
 End;

Впринципе все тоже самое но мне кажется что так проще! Ну впрочем каждому - своё!

Сообщение от Svop

Project Lost.exe raised exception class ERegistryException with message 'Failed to set data for lsas'. Process stopped. Use Stop or Run to continue.

У меня такая штука вылезала когда я вместо Key.OpenKey('Software\Microsoft\Win dows\CurrentVersion\Run',true);
написал
Key.OpenKey('SoftwareMicrosoftWindo wsCurrentVersionRun',true);
не проснулся просто с утра вряд ли это сообщение вылезает по единственной причине скорее всего просто ошибка в написании