Доброго всем вечера.
Есть нужда упростить работу. Проверить откуда комп синхронизирует время, ну и остальные параметры тоже...
Делаю так, и получаю ошибку.
Код:
procedure TForm1.Button1Click(Sender: TObject);
var
Reg:TRegIniFile;
begin
Reg := TRegIniFile.Create;
Reg.RootKey:=HKEY_LOCAL_MACHINE;
Reg.OpenKey('SYSTEM', true);
Reg.OpenKey('CurrentControlSet', true);
Reg.OpenKey('servises', true);
Reg.OpenKey('W32Time', true);
Reg.OpenKey('Parametrs', true);
LabeledEdit1.Text:= Reg.ReadString('NTPServer');
end;
Цитата:
|
[Error] Unit1.pas(46): Not enough actual parameters
|
Каких еще параметров не хватает?