Speichern Procedure funzt sporadisch :(

[glkgereon]

Hi

ich speichere im OnClose meiner Anwendung den Inhalt eines ValueListEditors...
doch die änderungen sind beim nächsten start (ja, ich lade wieder) wieder weg.

irgendwie funzt das speichern nur für die cells in col 0 und und die erste reihe...

hier der Code:

Delphi-Quellcode:

procedure TForm_Settings.VLELoad();
var I: Integer;
    Temp: TStringList;
begin
  //leeren
  VLEClear;
  //Laden
  Temp:=TStringList.Create;
  Temp.LoadFromFile(CAP_APP);
    for i:=0 to (Temp.Count div 2)-1 do
      VLE_Caps_Apps.InsertRow(Temp[i*2],Temp[i*2+1],True);
  Temp.Free;
end;

procedure TForm_Settings.VLESave;
var I: Integer;
    Temp: TStringList;
begin
  Temp:=TStringList.Create;
  Temp.Clear;
  with VLE_Caps_Apps do
    for i:=1 to RowCount-1 do
      begin
      Temp.Add(Cells[0,i]);
      Temp.Add(Cells[1,i]);
      end;
  Temp.SaveToFile(CAP_APP);
  Temp.Free;
end;

[marabu]

Hallo Gereon,

das Laden und Speichern geht so einfacher und weniger fehleranfällig:

Delphi-Quellcode:

VLE.Strings.SaveToFile(CAP_APP);
VLE.Strings.LoadFromFile(CAP_APP);

Grüße vom marabu

[glkgereon]

:(

so einfach?

wieso heisst das net items oder lines? :wall:

[glkgereon]

aha, und die linke spalte?

[pirechner]

in deiner save anweisung steht 1 und 0 anstatt i (zählvariable).

[glkgereon]

nein, 1 und 0 sind die spalten (gibt nur 2)

[glkgereon]

:wall:

in strings is ja beides drin

aber es funzt trotzdem nicht.

Delphi-Quellcode:

procedure TForm_Settings.VLELoad;
begin
  VLEClear;
  VLE_Caps_Apps.Strings.LoadFromFile(cCAP_APP);
  ShowMessage(VLE_Caps_Apps.Strings.Text);
end;

procedure TForm_Settings.VLESave;
begin
  VLE_Caps_Apps.Strings.SaveToFile(cCAP_APP);
  ShowMessage(VLE_Caps_Apps.Strings.Text);
end;

wenn ich nun was änder, so is die Showessage richtig. erneut laden, alles ok.
aber programm beenden, neu starten, laden, und es ist falsch!
kennt einer das problem?

[TKC]

köönte es sein das du die Ausgabe Datei erst löschen musst bevor du sie speicherst (wenn schon vorhanden).

[glkgereon]

nope, gerade ausprobiert

kann es sein das der irgendwie unterschiedliche dateien nimmt? (wobei, kann doch eigentlich gar net sein...)

[TKC]

wie ist denn der inhalt der Variablen cCAP_APP zur zeit des Laden/Speicherns ?