Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.11.20;
Скачать: CL | DM;

Вниз

реестр и Delphi   Найти похожие ветки 

 
Mister   (2005-10-27 02:39) [0]

Такая вот зараза - надо запускать PainKiller и для этого смотреть в реестре, где он находится. Ну, я так и делаю:

procedure TForm1.SpeedButton2Click(Sender: TObject);
var  s : string;
 Reg  : TRegistry;
 bo:boolean;
begin
reg:=tregistry.Create;
try
Reg.RootKey := HKey_Current_User;
Reg.OpenKey("HKEY_LOCAL_MACHINE\SOFTWARE\PeopleCanFly\Painkiller\", false);
s := reg.ReadString ("EXEpath");
finally
REg.CloseKey;
reg.FrEe;
end;
Пока я не запускаю, а просто смотрю - видит он его, или не видит
speedbutton2.Caption:=s ;
и вывожу путь к файлу в виде надписи для кнопки
end;

Короче - ничего не получается. Я пробовал проверить истинность openkey - и раздел действительно существует, то есть Readstring - не работает.
А тип строки reg_expand_sz, то есть так он строку видеть не хочет.

.Как получить всё-же эту строку


 
boalse ©   (2005-10-27 04:46) [1]

а "EXEpath" существует?



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

Текущий архив: 2005.11.20;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.027 c
4-1119347185
Alex870
2005-06-21 13:46
2005.11.20
Закрытие процесса


8-1120231094
psa247
2005-07-01 19:18
2005.11.20
Алгоритм развевающегося флага OPENGL


3-1128878473
Melamed
2005-10-09 21:21
2005.11.20
Почему рвется связь с MIDAS сервером?


14-1130301586
vidiv
2005-10-26 08:39
2005.11.20
Вывод страниц на PHP


2-1130746871
kyn66
2005-10-31 11:21
2005.11.20
Создание компонента в RunTime с родителем, созданным в RunTime