![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Реестр [D2, Win95/98]
don_dampster © (2002-06-19 09:01:00)Как записать своё значение в реестр? Как прочитать значение ... ?
Producer (2002-06-19 12:59:00) [1]Можно еще для полного порядка снабдить все это конструкциями
try - finallyи Ok.
Poirot (2002-06-19 11:13:00) [2]
> Внук
согласен....:)
AuduA6 (2002-06-19 10:36:00) [3]-----ЗАПИСЬ------
procedure TForm1.Button1Click(Sender: TObject);
var
tmp :Tregistry;
begin
tmp:= tregistry.Create;
tmp.Access:=KEY_WRITE;
tmp.RootKey :=HKEY_CURRENT_USER;
TMP.OpenKey("REP",TRUE);
TMP.WriteString("RBA", Edit1.Text);
tmp.CloseKey;
tmp.free;
end;
-----ЧТЕНИЕ------
procedure TForm1.Button2Click(Sender: TObject);
var
Registry: TRegistry;
v,S: string;
begin
Registry:=TRegistry.Create;
Registry.RootKey:=HKEY_CURRENT_USER;
Registry.OpenKey("REP",False);
Edit2.Text:=Registry.ReadString("RBA");
Registry.Free;
Внук (2002-06-19 09:03:00) [4]TRegistry F1