Daten aus ini auslesen

[StoRmtec]

Hallo Leute

Habe wieder mal ein Problem und zwar speichere ich von einer CheckListBox die aktivierten auflistungen und zwar so

Delphi-Quellcode:

procedure Tfrm_netz.btn_speichernClick(Sender: TObject);
var
ini:TIniFile;
    i: Integer;
s:String;
begin
ini := TIniFile.Create(IncludeTrailingPathDelimiter(GetCurrentDir)+'server.ini');
    begin
      try
        for i := 0 to Checklistbox1.Items.Count - 1 do
      if ChecklistBox1.Checked[i] = true then
          begin
            s:=s+ChecklistBox1.Items[i]+',';
          end;
            ini.WriteString('ChecklistBox','Items',s);
      finally
        ini.Free;
      end;
frm_haupt.Button2.Click;
close;
end;
end;

jetzt bin ich am verzweifeln wie ich die wieder auslesen kann.

Hat jemand eine Hilfe für mich

Danke

Mfg
StoRmtec

[Luckie]

Wie hast du es denn bisher probiert? Das sollte eigentlich auch in jedem Tutorial behandelt werden oder da, wo du dein Wissen über das Schreiben her hast.

Aber nebenbei bemerkt:
IncludeTrailingPathDelimiter(GetCurrentDir)+'server.ini' Was kommt denn da für ein Pfad bei raus? Guck mal hier: http://www.michael-puff.de/Artikel/G...irectory.shtml

[mkinzler]

Und es wird wie gewünscht gespeichert?

[rollstuhlfahrer]

IniFile.ReadString sollte dein Problem lösen.

Bernhard

[DeddyH]

Ein paar Dinge:
1. Deine Formatierung ist grauenhaft
2.

Zitat:

IncludeTrailingPathDelimiter(GetCurrentDir)+'server.ini'

macht nicht viel Sinn, da das das selbe Ergebnis liefert wie nur'server.ini' 3. Niemals auf true abfragen, besser (und eleganter) geht das mitif ChecklistBox1.Checked[i] then 4. Du könntest doch auch die einzelnen Items als Boolean-Werte in die Ini schreiben (oder gleich eine Bitmaske verwenden).
Ini.WriteBool('ChecklistBox',IntToStr(i),ChecklistBox1.Checked[i]); [edit] Da tippt man sich wund, und dann sind schon 3 Antworten da [/edit]

[StoRmtec]

OKay danke für die Antworten habe es ein wenig besser angepasst
Speichern geht echt super aber das auslesen komme echt nicht drauf wie ich die eingetragen einträge wieder auslesen kann
und in eine ChecklistBox wieder ausgeben kann.

Bitte um Hilfe

Danke

[DeddyH]

, der aktuelle Code wäre schon recht hilfreich, findest Du nicht?

[StoRmtec]

ist eh oben eingefügt habe nur den Pfad angepasst

danke

[DeddyH]

Schau Dir doch die Punkte 3 und 4 aus meinem Post noch einmal an, dann geht das ganz easy.

[StoRmtec]

Danke für die Hilfe was du leistet aber bei den Punkt 3 und 4 wenn ich das einsetze dann speichert er mir gar nichts
irgendwie mache ich da was falsch leider