|
Registriert seit: 31. Aug 2007
Ort: 99974 MHL
695 Beiträge
Delphi 10.1 Berlin Starter
|
Re: Kleines Problem mit INI
8. Okt 2007, 23:38
Delphi-Quellcode:
procedure TForm1.CheckBox1Click(Sender: TObject);
var ini: TIniFile;
begin
ini:=TIniFile.create(ExtractFilePath(ParamStr(0))+'test.ini');
ini.WriteBool('Test','Eigenschaft',CheckBox1.Checked);
ini.free;
end;
procedure TForm1.FormShow(Sender: TObject);
var ini: TIniFile;
begin
ini:=TIniFile.Create(ExtractFilePath(ParamStr(0))+'test.ini');
CheckBox1.Checked:=ini.ReadBool('Test','Eigenschaft',False);
ini.free;
end;
Das funzt bei mir, und ist effektiver 
Karl-Heinz Populanten von Domizilen mit fragiler, transparenter Aussenstruktur sollten sich von der Translation von gegen Deformierung resistenter Materie distanzieren!
(Wer im Glashaus sitzt sollte nicht mit Steinen werfen)
|