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

Вниз

Чтение строкового параметра из ключа реестра! Помогите   Найти похожие ветки 

 
Petrovich(Flame) ©   (2002-10-01 02:34) [0]

Подскажите почему не считываеться !!!unit Putzmann;

interface

uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
Grids,Registry, StdCtrls;

type
TForm1 = class(TForm)
StringGrid1: TStringGrid;
Button1: TButton;
Button2: TButton;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;

implementation

{$R *.DFM}

procedure TForm1.Button1Click(Sender: TObject);
var
Reg: TRegistry;
sss:string;
begin
StringGrid1.Cells[0,0]:="\Software\Microsoft\Intrnet Explorer\AboutURLs";
Reg := TRegistry.Create;
Reg.RootKey := HKEY_LOCAL_MACHINE;
Reg.OpenKey("\Software\Microsoft\Intrnet Explorer\AboutURLs\",True);
sss:=Reg.ReadString("blank");
StringGrid1.Cells[0,1]:=sss;
label1.caption:=sss;
Reg.CloseKey;
Reg.Free;
end;
end.

Заранее благодарю!


 
Bsl   (2002-10-01 07:53) [1]

А ты пользуй не TRegistry, а TRegIniFile - намного проще и не надо никаких OpenKey!


 
Внук ©   (2002-10-01 09:21) [2]

Прежде чем спрашивать, надо ж и самому хоть немного усилий приложить. Например, OpenKey возвращает значение, оно никого не интересует почему-то :)
Затем про ReadString написано: If there is no Registry entry with the specified name, ReadString returns an empty string. If the Registry entry contains something other than a string, an exception is raised.
То есть, если исключение не возникает, остается только вариант, что параметр не существует. Попробуй убрать первый и последний слэши в имени раздела.



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

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

Наверх




Память: 0.47 MB
Время: 0.022 c
4-32065
Jazzy$
2002-08-23 20:01
2002.10.10
Tooltip window


1-31797
ksan
2002-10-02 10:04
2002.10.10
фокусировка компонента


1-31826
autumn_orion
2002-09-27 17:04
2002.10.10
Перевод строки символов из win в dos кодировку.


1-31685
Cobalt
2002-09-27 18:55
2002.10.10
Как выйти из оператора case?


14-31939
Suntechnic
2002-09-13 18:16
2002.10.10
GUID