Vitaliy Jungle приводит следующий код:
var reg:Tregistry; begin reg:=Tregistry.create; reg.RootKey:=HKEY_LOCAL_MACHINE; reg.OpenKey('\Software\Microsoft\Windows\CurrentVersion\Detect',false); Edit1.Text:=reg.ReadString('TimeStamp'); reg.CloseKey; reg.Free; end; |
[001960]