Hallo, ich erstelle meine ini-Datei folgendermaßen:
Delphi-Quellcode:
procedure TForm5.Speichern1Click(Sender: TObject);
var ini: TIniFile;
begin
ini := Tinifile.create (ExtractFilePath(ParamStr(0))+'abi.ini');
try
ini.WriteString ('Fach1','Speicherung 1',panel2.caption);
ini.WriteString ('Fach2','Speicherung 2',panel3.caption);
ini.WriteString ('Fach3','Speicherung 3',panel4.caption);
ini.WriteString ('Fach4','Speicherung 4',panel5.caption);
Das schreiben klappt prima!
Nur das Auslesen geht nicht!
Delphi-Quellcode:
procedure TForm5.ffnen1Click(Sender: TObject);
var var1:string;
begin
ini := Tinifile.create ('F:\Delphi\BMI\inispeicher.ini');
try
var1:= ini.ReadString('Fach1','Speicherung1','');
panel2.caption:=var1;
{ panel2.Caption := ini.ReadString('Fach1','Speicherung1','');} {Das Auselesen geht weder nach der einen, noch nach der anderen Variante(es geht nur ums Anzeigen}
panel3.Caption := ini.ReadString('Fach2','Speicherung2','');
panel3.Caption := ini.ReadString('Fach3','Speicherung3','');
panel3.Caption := ini.ReadString('Fach4','Speicherung4','');
Benötige Hilfe! Danke im voraus.