Problem mit TIniFile ( Zugriffsverletzung )

[sharkx]

Hallo,

Ja, ich habe die DH sowie die Suchfunktion genutzt ;P
Aber leider führte dies nicht zu einem Erfolg. Wenn ich eine Ini File schreiben möchte, bekomme ich jedesmal eine Zugriffsverletzung mit EAviolation irgendwas.

Delphi-Quellcode:

uses IniFiles,

....


// Optionen speichern, Form schliessen
procedure TFormOption.Button1Click(Sender: TObject);
var
  Ini: TIniFile;
begin
  Ini.Create(ExtractFilepath(Application.ExeName) + 'settings.ini');      // hier auch schon Ini.Create(ExtractFilepath(Application.ExeName) + '/settings.ini'); getestet
  try
    Ini.WriteString('FlashFXP', 'Path', FormOption.Edit1.Text);
    Ini.WriteString('FlashFXP', 'Parameter', FormOption.Edit2.Text);
    Ini.WriteString('FlashFXP', 'QueueFile', FormOption.Edit5.Text);
    Ini.WriteString('FlashFXP', 'Source', FormOption.Edit9.Text);
    Ini.WriteString('FlashFXP', 'PathSource', FormOption.Edit11.Text);
    Ini.WriteString('FlashFXP', 'Target', FormOption.Edit10.Text);
    Ini.WriteString('FlashFXP', 'PathTarget', FormOption.Edit12.Text);
    Ini.WriteString('Section', 'Tag', FormOption.Edit3.Text);
    Ini.WriteString('Section', 'String', FormOption.Edit4.Text);
    Ini.WriteString('Section', 'TimeFirst', FormOption.Edit6.Text);
    Ini.WriteString('Section', 'TimeLast', FormOption.Edit7.Text);
    Ini.WriteString('Section', 'Intervall', FormOption.Edit8.Text);
  finally
    Ini.Free;   // Ini File freigeben
    Close;
  end;
end;

Ich weiß nicht woran es liegt. Im vergleich zur delphi Hilfe sollte auch kein fehler sein.
Die Ini File besteht noch nicht, also von daher auch nicht Schreibgeschützt.

Mfg

[Sharky]

Hai sharkx,

Du musst erst dein Ini erzeugen.

Delphi-Quellcode:

procedure TFormOption.Button1Click(Sender: TObject);
var
  Ini: TIniFile;
begin
 Ini := TIniFile.Create(ExtractFilepath(Application.ExeName) + 'settings.ini');
....

[/quote]

[sharkx]

omg .. des tu ich doch laut dem oberen source?!

[edit]
Ne eben nicht, danke :)
[/edit]