Suche effizienter machen

[nahpets]

Hallo,

Zitat von Zioone:

danke schon mal für die Antworten

Nur was ich nicht ganz verstehe ist das ich das LowerCase vor der Schleife machen soll.
Sann kennt er doch gar nicht "ii"?!
und wenn ich das wieder in einer Schleife mache, hab ich ja auch nichts mit gewonnen o_O

Sorry, bin Anfänger ^^'

Ich versuchs mal:

Für jeden Eintrag in FSelect.Strings werden text, text2 und text3 in Lowercase gesetzt. Das kannst Du vor der Schleife machen, diese Werte sind unabhängig vom Inhalt der Strings.

Wenn Du ohne Probleme FSelect.Strings in Kleinbuchstaben umwandeln kannst, weil es ausserhalb der Schleife z. B. nicht gebraucht wird, dann mach' eine zweite Schleife vor die jetzige Schleife.

for ii := 0 to FSelect.count - 1 ) do FSelect.Strings[ii] := lowercase(FSelect.Strings[ii]); dann wird aus

Delphi-Quellcode:

if Pos( LowerCase(text3), LowerCase( FSelect.Strings[ii] ) ) > 0 then 
begin 
  i:=Pos( LowerCase(text3), LowerCase( FSelect.Strings[ii] ) );

Delphi-Quellcode:

if Pos(text3,FSelect.Strings[ii]) > 0 then 
begin 
  i:=Pos(text3,FSelect.Strings[ii]);

und wenn Du das dann noch vertauschst, wird daraus

Delphi-Quellcode:

i:=Pos(text3,FSelect.Strings[ii]);
if i > 0 then 
begin

Dadurch sparst Du Dir sehr viele Lowercase und sehr viele Pos.

Stephan