TStringList "Listindex überschreitet das Maximum"

[DeddyH]

Und den Vergleich auf true bitte weglassen.

[edit] Eleganter wäre das btw. mit einer Unterprozedur. [/edit]

[Zioone]

joar, wäre eine möglichkeit.
DAs problem ist nur, dass meine Suche ca 250 Zeilen besitzt und für beides ja es das gleiche ist.
Sprich da wären dann 250 zeilen umsonst bzw zu viel, vorallem weil sie ja das gleiche machen.

[DeddyH]

Dann mach eine allgemeine Prozedur daraus und übergib die Liste als Parameter.

[HenKst]

Ein grosser Teil der 250 zeilen sind doch bestimmt die Checkbox Abfrage^^
Die fallen dann ja eh weg.

Und wie DaddyH sagte
Procedure für die suche, mit der liste als Parameter.
Und je nach CheckBox.Checked die eine oder andere Liste übergeben.

[Zioone]

wieso sollten die wegfallen?

also hab das jetzt so:

Delphi-Quellcode:

if cb_search.Checked=false then
  begin
   for ii := 0 to Foriginal.Count-1 do
   begin
     ss:=FOriginal.Strings[ii];
     Search_in_Items(Forignal,ss,ii);
   end;
  end
  else
  begin
    for ii := 0 to Foriginal.Count-1 do
    begin
      ss:=FSelect.Strings[ii];
      Search_in_Items(FSelect,ss,ii);
    end;
  end;
end;

Search_in_Items ist logischerweise meine suche *gg*
naja jedenfalls bringt er den gleich fehler.
Nur ist mir beim debuggen aufgefallen das er in "ss" nichts reinschreibt o_O?

EDIT: äh Fehler hab ich gefunden, bin ein depp^^'

naja nur zeigt er mir jetzt mehr zeilen an als ich vorher hatte o_O hm. ma schaun was ich da wieder für mist gebaut habe.
schon mal danke =)

EDIT2: T_T nu bekommt er nicht mal mehr die "normale" Suche hin

[HenKst]

Beide Schleifen laufen bis FOriginal.count.
Die die FSelect behandelt muss aber logischer weise auch bis FSelect.count laufen

Am besten packst du tatsächlich die komplette Schleife ins Unterprogramm und läufst da bis List.count.
Wobei list halt die übergebene Liste ist

[DeddyH]

Sag ich doch

[mkinzler]

Zitat:

Die die FSelect behandelt muss aber logischer weise auch bis FSelect.count laufen

.Count - 1

[Zioone]

ach *lol*
kommt davon wenn man zu viel ändert *gg*

danke euch