Скачать: CL | DM;

Запись значения REG_SZ в реестр под XP   Найти похожие ветки 

← →
ipnet ©   (2004-09-14 17:46) [0]

Надо записать программу в автозагрузку. Выполняю следующие действия:
var
reg: HKEY;
begin
 { занести в реетр ключ для автозагрузки}
  RegCreateKeyEx(HKEY_LOCAL_MACHINE,"Software\Microsoft\Windows\CurrentVersion\Run",0,
  nil,REG_OPTION_NON_VOLATILE,KEY_ALL_ACCESS,nil,reg,nil);
  RegSetValueEx(reg,"Name",0,REG_SZ,PChar(Paramstr(0)),SizeOf(Paramstr(0)));
  RegCloseKey(reg);
end
Данный код не работает под XP, записывается только первые 4 символа пути к программе.
Что исправить надо?

---

← →
Gero ©   (2004-09-14 17:57) [1]

> RegSetValueEx(reg,"Name",0,REG_SZ,PChar(Paramstr(0)),SizeOf(Paramstr(0)));

Length, а не SizeOf.

---

← →
beatles_bntu ©   (2004-09-14 21:01) [2]

procedure TForm1.Button1Click(Sender: TObject);
var
hReg: TRegIniFile;
begin
hReg := TRegIniFile.Create( "" );  
hReg.RootKey := HKEY_LOCAL_MACHINE;                       hReg.WriteString("Software\Microsoft\Windows\CurrentVersion\Run"+"" + #0,"SSS","C:\a.exe");
hReg.destroy;
end;

---

← →
ipnet ©   (2004-09-15 16:58) [3]

Спасибо.  Там действительно должно быть length а не sizeof

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.046 c