Hej
försöker använda registret men det går åt skogen

två problem som uppstått idag:
det första:

Om en checkbox är ikryssad ska det skrivas till registret.
och om den inte är ikryssad ska det tas bort från registret..
men jag får inte ordning på det:
<code>
if form2.CheckBox1.Checked then
begin
reg1.OpenKey('\Software\Microsoft\Windows\CurrentVersion\Run',true);
reg1.WriteString('hmm',Application.ExeName);
end
else
begin
reg1.OpenKey('\Software\Microsoft\Windows\CurrentVersion\Run',false);
reg1.DeleteKey('hmm');
end;
</code>

Den skriver till registret men den tar inte bort...varför?

problem två:

om en nykel i registet finns vill jag att en checkbox ska vara ikryssad
men det blir den inte..fattar inte varför:

<code>
else if Setting = 'startUp' then
if reg1.KeyExists('\Software\Microsoft\Windows\CurrentVersion\Run\hmm') then
form2.CheckBox1.Checked := true;
</code>

Löste det.

Var ju reg1.DeleteValue och reg1.ValueExists jag skulle använda.
helt fel ute alltså...=/

/bj

Hej igen,
andra problemet var visst inte löst..=/
funkar fortfarande inte att checka i checkboxen om värdet finns...

Verkligen ingen som kan?
behöver detta..=/

Detta funkade för mig. Tänk på att skilja på nycklar och värden!<code>
Reg1.RootKey := HKEY_CURRENT_USER;
CheckBox1.Checked := Reg1.keyexists('\Software\Microsoft\Windows\CurrentVersion\RunOnce\');
</code>

Tackar!!

men problemet är löst och lösningen är pinsam för mig...=( =(

En else ställde till det så koden inte kördes...