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

Вниз

Delphi+Реестр   Найти похожие ветки 

 
fighter@str   (2003-04-29 17:36) [0]

Мне нужны в текстовом виде имена отдельных строковых параметров реестра и их значения.
Подскажите, как можно их получить с помощью Delphi?
Если можно, я бы не отказался от пары исходников.
Мне посоветовали:
Reg := TRegistry.Create;
try
Reg.RootKey := HKEY_CURRENT_USER;
if Reg.OpenKey("\Software\Тест по Java", True) then
begin
Table1.DatabaseName:=Reg.ReadString("Базы данных");
Table2.DatabaseName:=Reg.ReadString("Базы данных");
end;
finally
Reg.CloseKey;
Reg.Free;
inherited;
end;
Прога не идет, ошибки:
[Error] Unit1.pas(27): Undeclared identifier: "tregistry"
[Error] Unit1.pas(29): Missing operator or semicolon
[Error] Unit1.pas(32): "THEN" expected but identifier "OpenKey" found
[Error] Unit1.pas(34): Undeclared identifier: "Table1"
[Error] Unit1.pas(35): Undeclared identifier: "Table2"


 
Digitman   (2003-04-29 17:46) [1]


> Undeclared identifier: "tregistry"


и что ? даже не задумывался, что и почему Undeclared ?


 
UzesCCron   (2003-04-29 19:15) [2]

use TRegistry;
думать надо...


 
evvcom   (2003-04-29 22:17) [3]

F1 на TRegistry покажет unit Registry, значит надо
uses Registry


 
Separator   (2003-04-30 06:47) [4]

uses Registry;
......
var
Reg: TRegystry;
begin
Reg := TRegistry.Create;
try
Reg.RootKey := HKEY_CURRENT_USER;
if Reg.OpenKey("\Software\Тест по Java", false) then begin
Table1.DatabaseName:=Reg.ReadString("Базы данных");
Table2.DatabaseName:=Reg.ReadString("Базы данных");
Reg.CloseKey
end
finally
Reg.Free
end
end;



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

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

Наверх




Память: 0.44 MB
Время: 0.005 c
1-34503
Демон
2003-04-29 22:42
2003.05.12
Работа с изображением


3-34374
Andreika
2003-04-20 18:05
2003.05.12
Экспорт Paradox в Access 97


1-34399
NAlexey
2003-04-30 11:00
2003.05.12
DateTimeToStr - Integer Overflow


1-34406
Striker
2003-04-30 12:08
2003.05.12
как из listbox1 перенести выделеные строки в listbox2 ?


14-34592
Soft
2003-04-21 18:05
2003.05.12
Партия программистов





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский