Teilstring in items suchen

[markus lemcke]

Hallo,

wenn ich in items (z.b. von einer Combobox) nach einem teilstring suchen möchte, das geht nur über eine schleife und pos oder?

gruß

Markus

[Bernhard Geyer]

Ja

[Karsten Adler]

fucntion SucheTeilstring( const Strings: TStrings; const Teil: String): Integer;
var
Ind : Integer;
begin
// Statt die Combobox direkt zu übergeben, wird Combobox.Items übergeben, dann funktioniert die Routine auch z.B. bei Listboxen
result := 0;
// "UpperCase" wird verwendet um NICHT Case-Sensitive zu arbeiten, "while" wegen dem Abbruch
while ( result < Strings.Count)
and ( AnsiPos( UpperCase( Teil), UpperCase( Strings[ Ind])) = 0)
do result := result + 1;
// KEIN TREFFER
if result >= Strings.Count
then result := -1;
end

[markus lemcke]

okay!
danke ihr beiden!

gruß

marku