mam maly problem... do uses dodalem Registry potem mam kodzik
procedure TForm1.Button1Click(Sender: TObject);
var
Reg: TRegIniFile;
User, Company: String;
begin
Reg := TRegIniFileCreate;
try
Reg.RootKey := HKEY_LOCAL_MACHINE;
Reg.OpenKey('Software\Microsoft\Windows NT', False);
User := Reg.ReadString('', 'RegisteredOwner', '');
Company := Reg.ReadString('', 'RegisteredOrganization', '');
Reg.CloseKey;
finally
Reg.Free;
end;
end;
ale niestety wywala blad :
Undeclared identifier: 'TRegIniFileCreate'
Mowi, ze nie rozpoznaje tego ciagu znakow, a ja nie wiem na co to zamienic, aby chodzilo...