in ini speichern

[eleonora]

Ich mache nach jeder Form ein ini.Free; aber er bringt mir trotzdem diese Zugriffsverletzung!

Ich poste mal eine Teil von dem jeweiligen Code!

Im Menüpunkt Englisch welches sich im Hauptformular befindet:

Code:

procedure language_englishClick(Sender: TObject);
begin
     ini := TiniFile.Create(C:/...);
     //Übersetzung des Hauptformulares
     file_file.Caption := 'File';
     file_exit.Caption := 'Exit';
     file_language.Caption := 'Language';
     language_german.Caption := 'German';
     language_english.Caption := 'English';
     
     //Übersetzung des Konfig-Fensters
     path.path_file.Caption := 'File';
     path.path_exit.Caption := 'Exit';
     path.path_language.Caption := 'Language';

     //Übersetzt das Browser-Fenster
     engage.engage_delete.Caption := 'Which Browser would you like to delete?';
     engage.engage_d.Caption := 'Delete';
    
     with ini do
     begin
          writestring('language', 'type', 'english');
     end;
     ini.Free;
end; //procedur

Das gleiche befindet sich auch im Deutschen menü.
Anschliessend mache ich diese in FormCreate des Hauptformulares

Code:

procedure TFormCreate(Sender: TObject);
begin
     ini := TiniFile.Create(C:/.....);

     with ini do
     begin
            
       language := readstring('language', 'type', '');

       if language = 'german'
       then
           language_german.Click
       else
           language_english.Click; 

     end;//with...
     ini.Free;
end;

Sorry für so viel Code und Danke für die Hilfe!

Eleonora