 Buono sconto 4% su Toner e Cartucce agli utenti AZpoint. SU Iomiricarico.it!!
Per salvere informazioni relative ad un programma, può essere utile appoggiarsi
al registro di windows invece che ad un file. Delphi mette a disposizione
la classe TRegistry per l'accesso al registro di windows. Vediamo
come funziona con un breve esempio:
Uses
... , Registry, ... ;
procedure UsaRegistro;
var
Reg:TRegistry;
begin
Reg := TRegistry.Create;
try
Reg.RootKey:=HKEY_LOCAL_MACHINE;
if Reg.OpenKey('Software\Applicazione\1.0', True) then
begin
Reg.WriteString('NomeChiave','Valore');
Reg.CloseKey;
end;
finally
Reg.Free;
end;
end;
Come prima cosa bisogna includere la unit Registry. Viene poi
creata una nuova istanza della class TRegistry ed eseguite le
operazioni allinterno di un "try ... finally". La proprietà RootKey
indica la chiave principale a cui accedere che può essere una delle seguenti:
- HKEY_CLASSES_ROOT
- HKEY_CURRENT_USER
- HKEY_LOCAL_MACHINE
- HKEY_USERS
- HKEY_CURRENT_CONFIG
- HKEY_DYN_DATA
Viene poi aperta la chiave "Software\Applicazione\1.0" tramite il metodo
OpenKey. Il secondo parametro permette, se impostato a true, di creare
la chiave se questa non esiste. Il valore ritornato è true se la chiave è stata
aperta o creata correttamente, false in caso contrario. Viene poi creata
una stringa (o sovrascritta se già esistente) di nome "NomeChiave" e valore
"Valore" tramite il metodo WriteString.
Una volta terminato di usare la chiave è necessario chiuderla tramite CloseKey e,
una volta finito di usare il registro, liberare la variabile reg tramite il metodo free.
|
Shopping
