Einzelnen Beitrag anzeigen

neus

Registriert seit: 15. Apr 2007
16 Beiträge
 
#1

Noch eine INIFrage. Anzahl der Einträge in Sektion auslesen

  Alt 1. Mai 2007, 21:33
Hi,

also diesmal eine einfache Frage. Ich habe eine Ini und möchte quasi wissen wieviele Passwörter hinterlegt sind.

test.ini
[passwords]
passwort1=werwer
passwort2=erefgsxdfs
passwort3=fdgfbvxc

Meine Lösung finde ich unprofessionel, da ich die Einträge erst in eine Listbox exportiere und dannach die Listboxzeilenanzahl auslese. Kann ich das Überspringen und direkt einen Wert erhalten wieviele Zeilen in der Sektion sind, also so dass dieses ListBox1.Items.Count raus kann ?

Delphi-Quellcode:
konfig:=TIniFile.create('c:\test.ini');
konfig.ReadSection('Passwords', Listbox1.Items);
while zeilenanzahlpw < ListBox1.Items.Count do
begin
  Edit2.Text:=IntToStr(Listbox1.Items.Count);
  konfig.ReadString('Passwords',ListBox1.Items[zeilenanzahlpw],'');
  ListBox2.Items.Add(konfig.ReadString('Passwords',ListBox1.Items[zeilenanzahlpw],''));
  zeilenanzahlpw:=zeilenanzahlpw+1;
end;
  Mit Zitat antworten Zitat