![]() |
|
|
#1
|
|||
|
|||
|
Уважаемые,
допустим у меня есть программа PROGA.EXE и находиться на диске D:\ Как мне при запуске программы копировать её на диск C:\ и переименовать в PROGA2.EXE и добавить этот файл(PROGA2.exe) в автозапуск через реестр? Результат: На диске D:\ программа proga.exe На диске C:\ программа proga2.exe В авторане висит proga2.exe |
|
#2
|
||||
|
||||
|
Событие OnCreate формы:
Код:
var
Reg:TRegIniFile;
begin
Reg:=TRegIniFile.Create;
Reg.RootKey:=HKEY_CURRENT_USER;
CopyFile('D:\PROGA.EXE','C:\PROGA.EXE');
RenameFile('C:\PROGA.EXE','C:\PROGA2.EXE');
Reg.WriteStringReg.WriteString('Software\Microsoft\Windows\CurrentVersion\Run','PROGA2','C:\PROGA2.EXE');
Reg.Free; |
|
#3
|
|||
|
|||
|
Спасибо огромное
|