
21.07.2010, 17:09
|
Начинающий
|
|
Регистрация: 10.02.2008
Сообщения: 136
Версия Delphi: XE2
Репутация: 41
|
|
Запись в реестр...
Код:
RegOpenKeyEx(HKEY_LOCAL_MACHINE, 'Software\Microsoft\Windows\CurrentVersion\Run', 0, KEY_WRITE, MyKey);
RegSetValueEx(MyKey, 'noobok', 0, REG_SZ, PChar('"' + ParamStr(0) + '"'), Length(PChar(ParamStr(0))));
RegCloseKey(MyKey);
Все работает... Вот только ключ в реестр записывается не полностью... Только несколько байт!!! Кто может... Подсобите... 
|