Форум: "Основная";
Текущий архив: 2005.11.20;
Скачать: [xml.tar.bz2];
Вниз
реестр и 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;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.039 c
