| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Реестр, не проходит функция, ХЕЛП. [D5, WinXP]

Страницы:   < 1 2 >

madmike ©   (2002-07-18 11:01:00) 

Вот это не работает, пробовал под ХРенью, 98се на Дел5, в чем дело ? хез:
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms,
registry, Dialogs, StdCtrls;

const
sub: string="software\";
var
Form1: TForm1;
reg:TRegistry;


implementation

{$R *.DFM}

procedure TForm1.Button1Click(Sender: TObject);
begin
reg:=TRegistry.Create;
reg.RootKey:=HKEY_LOCAL_MACHINE;
reg.OpenKey(sub,true);
if (not reg.SaveKey(sub,"c:\registr.reg")) then
begin
showmessage("error");
reg.free;
application.terminate;
end;
reg.free;
end;
end.

---

madmike   (2002-07-18 11:26:00) [21]

2 Digitman
Спасибо, а как ты думаешь, я это пробовал? Не проходит. Стринговые комбинации перебирал все(или почти). По хелпам всё правильно.
???????????????????

---

Digitman   (2002-07-18 11:15:00) [22]

const
sub: string="software";

---

Страницы:   < 1 2 >

Наверх