IniFile wird nicht erstellt

[Matze]

Angenommen du hast Schreibrechte. Stimmt denn der Pfad, wenn du ihn dir einmal ausgeben lässt?

Ich würde die Datei übrigens nur so lange öffnen wie du sie brauchst und Ressourcenschutzblöcke verwenden:

Delphi-Quellcode:

// auslesen:
Ini := TIniFile.Create(ExtractFilePath(Application.Exename) + 'Config.ini');
try
  Workspace := Ini.ReadInteger('Colors', 'Workspace', PaintGreen); 
finally
  FreeAndNil(Ini);
end;

// schreiben:
Ini := TIniFile.Create(ExtractFilePath(Application.Exename) + 'Config.ini');
try
  Workspace := Ini.WriteInteger('Colors', 'Workspace', Workspace); 
finally
  FreeAndNil(Ini);
end;

Was wird denn ausgegeben, wenn du nach dem Ini-Versuch das hier ausgeben lässt:

Delphi-Quellcode:

ShowMessage(SysErrorMessage(GetLastError));

Grüße, Matze

[implementation]

Der Pfad stimmt.
Und es gibt auch keinen Fehler.

[Matze]

Hm, dann müsste aber eigentlich alles gehen, wenn nicht einmal GetLastError einen Fehler zurückgibt.

Wird der Code sicher auch aufgerufen?
Sonst teste es doch mal im OnCreate, falls es das bei dir geben sollte.

[Luckie]

Zitat:

Zitat von implementation

Der Pfad stimmt.
Und es gibt auch keinen Fehler.

Das heißt, sie wird nicht angelegt? Damit deine Ini-Datei geschrieben wird, müssen zwei Dinge passieren: Erstens muss etwas hineingeschrieben werden und zweites muss sie geschlossen werden. Tust du beides? Desweiteren sollte natürlcih der Pfad stimmen und man sollte dort auch Schreibrechte haben. Was die Rechte angeht, was für ein Betriebssystem wird genutzt? Wenn du in das Programmverzeichnis unter C.\Programme schreibst, kann dir Vista den Pfad auch ungewollt umbiegen in einen Pfad in deinem Benutzerprofil.

[SirThornberry]

Könntest du bitte dem Beitrag einen aussagekräftigeren Titel geben? Bei IniFiles kann es recht viele Probleme geben. Ein aussagekräftigerer Titel hat den Vorteil das andere mit gleichem Problem diesen Beitrag später über die Suche schneller finden und somit auch die eventuelle Lösung. Zudem hat es für dich den Vorteil das anhand eines aussagekräftigen Titels die Leute sofort wissen ob sie eventuell helfen können und entsprechend das Thema anschauen :)

[implementation]

@Matze: Es wird jetzt eine Meldung ausgegeben, wenn der Code ausgeführt wird.
Und sie erscheint. Der Code wird also aufgerufen.

@Luckie: 1. Was meinst du mit schließen. Es wird FreeAndNil aufgerufen.
Ansonsten nichts.
2. Ich arbeite unter Windows XP, und das Programm ist unter D:

[Luckie]

Zitat:

Zitat von implementation

@Luckie: 1. Was meinst du mit schließen. Es wird FreeAndNil aufgerufen.
Ansonsten nichts.

Das meinte ich mit schliessen. Kannst du denn ein memo mit SaveToFile dort speichern?

[implementation]

Ja

[Luckie]

Dann sehe ich keinen Grund, warum das mit einer Ini-Datei nicht funktionieren sollte. Zeig noch mal deine aktuellen Code zum Schreiben und Lesen.

[implementation]

Delphi-Quellcode:

initialization
  Ini := TIniFile.Create(ExtractFilePath(Application.Exename) + 'Config.ini');
  ShowMessage(ExtractFilePath(Application.Exename) + 'Config.ini');
  try
    Workspace := Ini.ReadInteger('Colors', 'Workspace', PaintGreen);
  finally
    FreeAndNil(Ini);
  end;
finalization
  Ini := TIniFile.Create(ExtractFilePath(Application.Exename) + 'Config.ini');
  try
    Ini.WriteInteger('Colors', 'Workspace', Workspace);
  finally
    FreeAndNil(Ini);
  end;
end.