Hej Löste det. Hej igen, Detta funkade för mig. Tänk på att skilja på nycklar och värden!<code> Tackar!!registerfel
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>Sv: registerfel
Var ju reg1.DeleteValue och reg1.ValueExists jag skulle använda.
helt fel ute alltså...=/
/bjSv: registerfel
andra problemet var visst inte löst..=/
funkar fortfarande inte att checka i checkboxen om värdet finns...Sv: registerfel
Reg1.RootKey := HKEY_CURRENT_USER;
CheckBox1.Checked := Reg1.keyexists('\Software\Microsoft\Windows\CurrentVersion\RunOnce\');
</code>Sv: registerfel
men problemet är löst och lösningen är pinsam för mig...=( =(
En else ställde till det så koden inte kördes...