|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#16
|
||||
|
||||
на самом деле это на много красивее, чем куча "[][][]"
ведь даже: Код:
var Reg: TRegistry; begin Reg := TRegistry.Create; try Reg.RootKey := HKEY_CURRENT_USER; if Reg.OpenKey('\Software\Microsoft\Windows\CurrentVersion\RunOnce', True) then begin Reg.WriteString('MyApp','"' + ParamStr(0) + '"'); Reg.CloseKey; end; finally Reg.Free; inherited; end; end; и путь можно задать любой. Пишу программы за еду. __________________ |
Этот пользователь сказал Спасибо NumLock за это полезное сообщение: | ||
morebeauty (21.02.2013)
|