VPF::Как получить значение по умолчанию

Zloy_Misha

Дата 9.2.2008, 09:05 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 11
Регистрация: 7.10.2007

Репутация: нет
Всего: нет

В реестре в каждом разделе есть параметр (По умолчанию). Как получить его значение и изменить с помощью Registry??

Это сообщение отредактировал(а) Zloy_Misha - 9.2.2008, 09:49

Rrader

Дата 9.2.2008, 16:51 (ссылка)

(голосов:2)

Загрузка ...

Inspired =)

Профиль
Группа: Экс. модератор
Сообщений: 1535
Регистрация: 7.5.2005

Репутация: 70
Всего: 191

Код


Procedure TForm1.Button1Click(Sender: TObject);
Var
  R: TRegistry;
  S: String;
Begin
  R := TRegistry.Create;
  Try
    R.RootKey := HKEY_CURRENT_USER;
    R.OpenKey('Software', False);
    S := R.ReadString(PChar(NIL));
    If S <> '' Then
      ShowMessage(S)
    Else
    Begin
      ShowMessage('<Значение не присвоено>');
      R.WriteString(PChar(NIL), 'Dummy');
    End;
  Finally
    R.Free;
  End;
End;

Это сообщение отредактировал(а) Rrader - 9.2.2008, 16:54

--------------------

Let's do this quickly!
Rest in peace, Vit!

Zloy_Misha

Дата 10.2.2008, 19:06 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 11
Регистрация: 7.10.2007

Репутация: нет
Всего: нет

Rrader, спасибо большое

1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Общие вопросы \| Следующая тема »