ReadDateTimeDef(ValueName: String; DefaultValue: DateTime): DateTime;
ValueName - наименование параметра, значение которого необходимо получить.
DefaultValue - значение, которое будет подставляться, если параметр не существует.
Метод ReadDateTimeDef осуществляет считывание даты и времени из двоичного параметра в реестре. Если параметр с наименованием ValueName не существует - метод возвращает DefaultValue.
Sub Main;
Var
RegKey, SubKey: IRegistryKey;
d: DateTime;
Begin
RegKey := RegistryClass.CurrentUser;
SubKey := RegKey.OpenSubKey("Software\MyProject\Params", False);
d := SubKey.ReadDateTimeDef("Param1", DateTime.Now);
End Sub Main;
После выполнения примера, из параметра с наименованием "Param1", расположенного в подразделе реестра "HKEY_CURRENT_USER\Software\MyProject\Params", в переменную "d" будет считано значение даты и времени. Если параметр не существует - в переменной "d" будет содержаться значение текущая дата и время.
См.также: