Merk-Proze für die Checkbox
Code:
procedure TForm1.CheckBox1Click(Sender: TObject);
begin
IniSet:=TIniFile.Create('.\sndset.ini');
try
if Checkbox1.Checked then
IniSet.WriteBool('Musik','zustand',True)
else
IniSet.WriteBool('Musik','zustand',False);
finally
IniSet.Free;
end;
end;
hmm