Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

TRegIniFile [D7, WinME]

AdmeraL © (2004-09-24 17:09:00)
Я составил программу для просмотра строковова значения в реестре. Но там ошибка...что за она, не знаю...помогите кто может. вот исходник:

unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, registry;
type
TForm1 = class(TForm)
Label1: TLabel;
Label2: TLabel;
Edit1: TEdit;
Edit2: TEdit;
Button1: TButton;
Button2: TButton;
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;
t:tregistry;

implementation

{$R *.dfm}
begin
t:=treginifile.Create;
t.RootKey:=hkey_local_machine;
t.OpenKey('software',true);
t.OpenKey('microsoft',true);
t.OpenKey('windows',true);
t.OpenKey('currentversion',true);
form1.Edit1.Text:=t.ReadString('RegisteredOrganization');
t.CloseKey;
t.Free;
end.

напишите мне на мыло или оставте сообщение на форуме.посибо
Anatoly Podgoretsky (2004-09-24 17:31:00) [1] Это как, копировать пример сюда, когда он у тебя на компьютере лежит? Ты [4] выполнил? ЗЫ; у нас тут не блатная малина, поэтому выбирай выражения. AdmeraL (2004-09-24 17:21:00) [2] не в падлу, покажите на этом примере... Anatoly Podgoretsky (2004-09-24 17:20:00) [3] [4] AdmeraL (2004-09-24 17:18:00) [4] А какие параметры? Anatoly Podgoretsky (2004-09-24 17:17:00) [5] Зачем это t:=treginifile.Create; используй TRegistry ReadString имеет три параметра Во вторых тебя все равно компилятор не поймет, поскольку treginifile.Create, а у TRegistry.ReadString два параметра. AdmeraL (2004-09-24 17:17:00) [6] посибо конечно, но это делу не поможет... Anatoly Podgoretsky (2004-09-24 17:17:00) [7] Да и в третьих про F1 видимо и не догадываешься? clickmaker (2004-09-24 17:11:00) [8] > t.OpenKey('software',true); > t.OpenKey('microsoft',true); > t.OpenKey('windows',true); > t.OpenKey('currentversion',true); че за слоеный пирог такой? заменить на t.OpenKey('software\microsoft\windows\currentversion',false); Наверх

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