C
coca
Unregistered / Unconfirmed
GUEST, unregistred user!
procedure TForm1.Button1Click(Sender: TObject);
var
Reg:TRegistry
s: string;
begin
Reg:=TRegistry.Create;
Reg.RootKey:=HKEY_LOCAL_MACHINE;
if Reg.OpenKey('/SOFTWARE/Description/Microsoft/Rpc/UuidTemporaryData',false) then
s:= reg.ReadString('NetworkAddress');
Reg.CloseKey;
Reg.Free;
edit1.Text:=s;
end;
使用时提示: Invalid data type for 'NetworkAddress',请问如何解决。
var
Reg:TRegistry
s: string;
begin
Reg:=TRegistry.Create;
Reg.RootKey:=HKEY_LOCAL_MACHINE;
if Reg.OpenKey('/SOFTWARE/Description/Microsoft/Rpc/UuidTemporaryData',false) then
s:= reg.ReadString('NetworkAddress');
Reg.CloseKey;
Reg.Free;
edit1.Text:=s;
end;
使用时提示: Invalid data type for 'NetworkAddress',请问如何解决。