Сохранить в реестр текстовую строку.
function RegSetString(iRootKey: cardinal; sName: string; sValue: string): boolean;
Параметр |
Тип |
Значение |
---|---|---|
iRootKey |
cardinal |
корневой раздел реестра. Список возможных ключей; |
sName |
string |
ветка и ключ реестра, где будет сохранена текстовая строка; |
sValue |
string |
значение ключа. |
Булево значение. True, если функция выполнена успешно, False, если возникла какая-либо ошибка.
var
sToday: string;
begin
sToday := FormatDateTime('ddmmyyyy', Now);
RegSetString(HKEY_CURRENT_USER, 'Software\MyChatServerScripts\CurrentDate', sToday);
end.