Inifile wird nicht gespeichert [delphi2007]

[winx]

Hi,

wenn ich mit dieser Funktion ein leeres Inifile erstellen und speichern möchte klappt das
irgendwie nicht, egal wo ich es hin speichern möchte;

Delphi-Quellcode:

procedure TDockFormsSaver.SaveToolFormLayout;
var ini : TIniFile;
begin

  
      ini := TIniFile.Create(fAppStorage.FileName);
      FreeAndNil(ini);
      ini := TIniFile.Create('C:\z.ini');
      FreeAndNil(ini);
      ini := TIniFile.Create('z.ini');
      FreeAndNil(ini);
  

  
end;

woran kann das denn liegen???

danke,
winx

[Luckie]

Leere Ini-Dateien werden nicht angelegt von Windows. Du musst schon was reinschreiben.

[taaktaak]

Was sollte denn da überhaupt gespeichert werden? Wie soll denn eine "leere" Ini-Datei aussehen? Wozu soll das gut sein?

[hoika]

Hallo,

schreibe was rein und lösche es dann wieder.
Die Ini dürfte dann immer noch dasein.


Heiko

[Luckie]

Zitat:

Zitat von hoika

schreibe was rein und lösche es dann wieder.
Die Ini dürfte dann immer noch dasein.

Umständlich. warum nicht einfach mit CreateFile eine leere Datei anlegen?

[RavenIV]

Mit TIniFile.Create erstellst Du nur das Objekt.
Da wird noch kein File auf der Platte angelegt.
Erst eine Write-Funktion (WriteInteger, WriteString, usw) sorgt dafür, dass in das File geschrieben wird.
Existiert das File noch nicht, wird es angelegt.

Und warum verwendest Du FreeAndNil?
Besser wäre hier ini.Free.

Den Namen für das ini-File kannst Du hiermit relativ elegant bekommen.
Das ini-File heisst dann wie die Exe der Applikation, nur eben als Dateierweiterung .ini.

Delphi-Quellcode:

var
  IniFile: TIniFile;
begin
  IniFileName := ExtractFilePath(Application.ExeName) + ExtractFileName(Application.ExeName);
  IniFileName := ChangeFileExt(IniFileName, '.ini');

  IniFile := TIniFile.Create(IniFileName);
  ...
  ...
  IniFile.Free;
end;

/edit:
Ich sehe gerade, dass Du vermutlich das FormLayout (Position, Grösse, usw) speichern willst.
Dazu gibt es eine Komponente, die das macht.
Bei den RxKomponenten (mittlerweile bei der JVCL dabei, gibt ea aber auch noch einzeln) ist das
TFormPlacement und TFormStorage dabei.
Die können das FormLayout in ein ini oder in die Registry schreiben und auch wieder auslesen.
Komponente auf das Form ziehen, konfigurieren und der Rest geht automatisch.
Einfach mal anschauen...

[Luckie]

Zitat:

Zitat von RavenIV

Und warum verwendest Du FreeAndNil?
Besser wäre hier ini.Free.

Kannst du das begründen?

[mkinzler]

Es handelt sich um eine lokale Variable und wird sofort wiederverwendet. Deshalb ist ein Setzten auf Nil nicht unbedingt notwendig; falsch aber auch nicht.

[Luckie]

Es ging nicht um falsch oder richtig, sondern um besser und schlechter.

[RavenIV]

Zitat:

Zitat von Luckie

Zitat:

Zitat von RavenIV

Und warum verwendest Du FreeAndNil?
Besser wäre hier ini.Free.

Kannst du das begründen?

Ruft FreeAndNil auch Destroy auf?
Denn im TIniFile.Destroy passieren auhc noch einige (nicht unwichtige) Dinge.

Ausserdem finde ich es übersichtlicher, wenn es so ist:

Delphi-Quellcode:

MyObject := TMyObject.Create(...);
MyObject.MyVariable := Irgendwas;
MyObject.MachWas(...);
MyObject.Free;