Thema: Delphi TiniFile

Einzelnen Beitrag anzeigen

Benutzerbild von Privateer3000
Privateer3000

Registriert seit: 10. Jun 2002
Ort: Jena
1.128 Beiträge
 
Delphi 10.4 Sydney
 
#1

TiniFile

  Alt 16. Dez 2002, 07:37
Hi Leuts,

ich will aus einem Inifile den Inhalt
von einigen Edit Feldern speichern und wieder auslesen.
Das Speichern klappt nur beim lesen haperts.

Code:
procedure TForm1.FormActivate(Sender: TObject);
var
Ini: TIniFile;
begin
  try
    Ini:=TIniFile.Create('dat\konfig.ini');
    with Ini do
    begin
    in1.text:=ReadString('Position','Feld1','0');
    in2.text:=ReadString('Position','Feld2','0');
    in3.text:=ReadString('Position','Feld3','0');
    in4.text:=ReadString('Position','Feld4','0');
    in5.text:=ReadString('Position','Feld5','0');
    in6.text:=ReadString('Position','Feld6','0');
    in7.text:=ReadString('Position','Feld7','0');
    in8.text:=ReadString('Position','Feld8','0');
    in9.text:=ReadString('Position','Feld9','0');
    in10.text:=ReadString('Position','Feld10','0');
    end;
  finally
    Ini.free;
  end;
end;
Auslesen tut es ja und wird koorekt in die Felder eingetragen, trotzdem geht jeder Lesevorgang mit einer Zugriffsverletzung einher.
Woran könnte das liegen??

Grüsse Privateer

PS.Grüsse an Spocki (gibts dich noch?? )
Peter
+++Versuch es nicht mit Gewalt + Nimm einen größeren Hammer! +++
  Mit Zitat antworten Zitat