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

Вниз

Tregistry   Найти похожие ветки 

 
AdmeraL ©   (2004-09-24 19:14) [0]

гляньте чё тут не так...я уже всё перепробовал

begin
t:=treginifile.Create;
t.RootKey:=hkey_local_machine;
t.OpenKey("software\microsoft\windows\currentversion",false);
form1.Edit1.Text:=t.ReadString("currentversion","RegisteredOwner",form1.Edit2.Text);t.Free;
end.


 
simpson ©   (2004-09-24 19:19) [1]


function ReadString(const Name: String): String;


С каких пор форум заменяет компилятор?


 
Defunct ©   (2004-09-24 19:21) [2]

А где вопрос?

var Registry : TRegistry;

Registry := TRegistry.Create;
Registry.RootKey:=HKEY_CURRENT_USER;
Registry.OpenKey("SOFTWARE\ODBC\ODBC.INI\"+Database,True);
Registry.WriteString("Driver","odbcjt32.dll");
Registry.CloseKey;
Registry.Free;


 
AdmeraL ©   (2004-09-24 19:25) [3]

всё равно я не понял чё мне надо зделать...объясните точней пожалусто.


 
simpson ©   (2004-09-24 19:27) [4]

Посчитай количество параметров функции ReadString в

function ReadString(const Name: String): String;


сравни его с количеством в

t.ReadString("currentversion","RegisteredOwner",form1.Edit2.Text);


и сделай выводы.


 
AdmeraL ©   (2004-09-24 19:30) [5]

меня учили,да и в подсказках написано, что у readstring три параметра, но всё-равно спосибо...попробую


 
simpson ©   (2004-09-24 19:33) [6]

Только TRegIniFile замени на TRegistry


 
Defunct ©   (2004-09-24 19:35) [7]

AdmeraL ©   (24.09.04 19:25) [3]

тут уж нечего сказать:
Переставьте иконки на рабочем столе.


 
AdmeraL ©   (2004-09-24 19:38) [8]

не поможет..


 
Anatoly Podgoretsky ©   (2004-09-24 19:42) [9]

Так ты до сих пор не посмотрел справку и примеры в ней. Ленивый ты Парамоша.



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

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

Наверх




Память: 0.48 MB
Время: 0.024 c
14-1095591487
Программер_
2004-09-19 14:58
2004.10.10
Два вопроса по коду кто знает помогите


14-1095187743
Fusly
2004-09-14 22:49
2004.10.10
SP2 for WinXP


1-1096030702
Mirror
2004-09-24 16:58
2004.10.10
GetLogicalDrives


14-1095420158
Nikolay M.
2004-09-17 15:22
2004.10.10
Никому инспектор в отдел кадров в Москве не требуется?


3-1095154874
12345
2004-09-14 13:41
2004.10.10
Можно ли менять содержимое таблицы, если менятьг грид ADOQuery?