Скачать: 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 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.012 c