Listbox ohne Wertbezeichnung aus INI füllen?

[DeddyH]

Jetzt hab ich mir 3 mal die Brille geputzt, aber immer noch nichts gefunden. Gut, dann mal in der Langform:

Delphi-Quellcode:

try
    for i := 0 to Pred(ListBox2.Items.Count) do
      begin
        s := ListBox2.Items[i];
        iPos := Pos('=', s) + 1; //iPos: integer
        s := Copy(s, iPos, Length(s)); //hier ist der Fehler, sorry, hab das s vergessen
        Listbox2.Items[i] := s;
      end;
  finally
    ListBox2.Items.EndUpdate;
  end;

Heißt also, in der Version von oben muss es lauten

Delphi-Quellcode:

var s: string;
    i: integer;
begin
  ListBox1.Items.BeginUpdate;
  try
    for i := 0 to Pred(ListBox1.Items.Count) do
      begin
        s := Copy(ListBox1.Items[i], Pos('=',ListBox1.Items[i]) + 1, Length(ListBox1.Items[i]));
        ListBox1.Items[i] := s;
      end;
  finally
    ListBox1.Items.EndUpdate;
  end;
end;