InI- Datei wird nicht geändert! Warum?
Delphi-Quellcode:
procedure TForm2.CheckBox1Click(Sender: TObject);
var
ini: TIniFile;
filename:
String;
begin
if CheckBox1.Checked = false
then
begin
filename := ExtractFilePath(ParamStr(0)) + '
Einstellungen.ini';
ini := TIniFile.Create(filename);
try
ini.WriteString('
mySQL', '
Autologin', '
true');
finally
ini.Free
end;
end else
begin
filename := ExtractFilePath(ParamStr(0)) + '
Einstellungen.ini';
ini := TIniFile.Create(filename);
try
ini.WriteString('
mySQL', '
Autologin', '
false');
finally
ini.Free;
end;
end;
end;