PDA

Ver la Versión Completa : problema en el registro de windows


ascrnet
29-12-2007, 03:42:57
hola a todos

bueno aqui tengo otro problemita con delphi, vi ejemplo de manejo de registro de windows en el foro, de hay aplique lo siguiente :


uses Registry;
{$R *.dfm}

......

reg: TRegistry;
begin
reg.RootKey := HKEY_CURRENT_USER;
if reg.OpenKey('Software\Atari800WinPLus',true) then
begin
ShowMessage('lo encontro'+ reg.ReadString('fileRomXLXE'));
end;
reg.CloseKey;
end;
pero no me funciona no encuentra la clave que ando buscando :confused:, y lo otro al cerra mi aplicacion el delphi me tira error , yo creo que donde debo hacerle el destructor de la funcion TRegistry, pero en realidad donde se pone :confused:.

aaa este el archivo .reg generado con el regedit.

Windows Registry Editor Version 5.00

[HKEY_CURRENT_USER\Software\Atari800WinPLus]
"miscRefreshRate"=dword:00000001
"fileRomXLXE"="C:\\Archivos de programa\\Atari800WinPLus\\ATARIXL.ROM"
"fileRom5200"="None"
saludos y gracias por cualquier ayudita.

Héctor Randolph
29-12-2007, 04:12:27
Hola ascrnet

El problema es que estás intentando acceder a los métodos de la clase, sin antes haber creado una instancia.

Solamente añade el constructor y al final el método Free para destruirlo


var
reg: TRegistry;
begin
reg:=TRegistry.Create;
reg.RootKey := HKEY_CURRENT_USER;
if reg.OpenKey('Software\Atari800WinPLus',true) then
begin
ShowMessage('lo encontro'+ reg.ReadString('fileRomXLXE'));
end;
reg.CloseKey;
reg.Free;
end;


Saludos

ascrnet
29-12-2007, 04:26:14
El problema es que estás intentando acceder a los métodos de la clase, sin antes haber creado una instancia.

Solamente añade el constructor y al final el método Free para destruirlo


:eek: eso era mil gracias colega Héctor Randolph, es que yo pense que esa linea
reg:=TRegistry.Create; era para insertar una nueva clave :p y era la instancia :D

saludos