![]() |
|
#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
|
|||
|
|||
![]() Спасибо огромное
|