hey,
in der INI-Datei steht:
[Receive]
Port=5554
Active=false
aber die Checkbox ist Checked = true
Delphi-Quellcode:
procedure TForm1.FormShow(Sender: TObject);
var
ini: TIniFile;
filename:
String;
begin
Filename := ExtractFilePath(ParamStr(0)) + '
Settings.ini';
ini := TIniFile.Create(filename);
try
mySQL.Server := ini.ReadString('
mySQL','
Server','
');
mySQL.Database := ini.ReadString('
mySQL','
Database','
');
Receive.Port := ini.ReadInteger('
Receive','
Port',0);
Receive.Active := ini.ReadBool('
Receive','
Active', True);
// das geht nicht
Form2.CheckBox1.Checked := ini.ReadBool('
Receive','
Active', True);
// das geht nicht
Form2.Edit1.Text := ini.ReadString('
mySQL','
Server','
');
Form2.Edit2.Text := ini.ReadString('
mySQL','
Database','
');
Form2.Edit3.Text := ini.ReadString('
Receive','
Port','
');
finally
ini.Free;
end;
end;