Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2003.06.19;
Скачать: [xml.tar.bz2];

Вниз

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

 
Xeon   (2003-06-04 16:41) [0]

дарова народ. Скажите мне, как записать значение в реестр типа стринг? Как считать значение - понял, как записать - непонял. Желатьльно записать значение используя ТРегистри.


 
Sandman25   (2003-06-04 16:44) [1]

WriteString заменяем на ReadString


 
Pattern   (2003-06-04 18:54) [2]

Пишу прямо здесь в Delphi не проверял, так штаааа..... Могут быть ошибки...
d;)
procedure TForm1.Button1Click(Sender: TObject);
var
reg_: TRegistry;
begin
reg_ := TRegistry.Create // Создаём объект reg_, с которой будем работать.
reg_.RootKey := HKEY_LOCAL_MACHINE; //Устанавливаем корневой ключ.
if reg_.KeyExists("\Software\Microsoft\MyProgs\") then // Если ключ существует ...
begin
reg_.OpenKey("\Software\Microsoft\MyProgs\", true); // ... открываем его ...
TEdit1.Text := Reg.ReadString("Version"); // ... и читаем строковый параметр Version
end
else // Если ключа не существет ...
begin
reg_.OpenKey("\Software\Microsoft\MyProgs\", true); // ... создаём его ...
reg_.WriteString("Version", "My best Prog Version 1.0"); // ... и записываем в него строковый параметр.
end;
reg_.Free; // Удаляем объект reg_ из памяти
end;


 
VMcL   (2003-06-04 19:05) [3]

>Pattern © (04.06.03 18:54)
try...finally...end.


 
Pattern   (2003-06-04 19:45) [4]

2VMcL -> 100 в гору!!! d;) Писал, что первое в бошку взбредёт (какое правильное слово!!!) Но если честно, то я вообще никогда реестром не пользуюсь - не доверяю этой фиче... d%(


 
Xeon   (2003-06-05 11:01) [5]

Да я просто дописываю программу для создания инсталяций. TheSoft install system 1.0. Но вот встала последняя проблема - это которая с реестром была.
P.S. Всем спасибо за ответы.


 
NickBat   (2003-06-05 11:38) [6]

Куда катится этот мир? Человек ДОПИСЫВАЕТ программу для создания инсталляций и не ЗНАЕТ как писать строки в реестр????



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

Форум: "Основная";
Текущий архив: 2003.06.19;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.45 MB
Время: 0.007 c
1-60245
vlv
2003-06-05 20:37
2003.06.19
Как преобразовать строку, содержащую 16-тиричное выражение?


14-60391
Мазут Береговой
2003-06-02 20:52
2003.06.19
Хотите узнать о мед.обслуживании в США? Читайте здесь:


3-60052
vak
2003-05-27 13:17
2003.06.19
Наследник TDataSet


7-60439
Brand2000
2003-04-15 06:25
2003.06.19
Смена разрешения экрана не отображает панель задач


7-60443
Bug
2003-04-16 10:22
2003.06.19
версия ОС.





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский