Форум: "Основная";
Текущий архив: 2004.10.10;
Скачать: [xml.tar.bz2];
Вниз
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;
Скачать: [xml.tar.bz2];
Память: 0.46 MB
Время: 0.485 c
