Zitat von
Hansa:
Wo ist denn DeleteEntry initialisiert worden ? Davon sehe ich nichts.
Du nicht? Ich schon:
Delphi-Quellcode:
if CaseSensitive then
DeleteEntry := (Pos(Pattern, Items[i]) = 0)
else
DeleteEntry := (Pos(LowerCase(Pattern), LowerCase(Items[i])) = 0 );
DeleteEntry wird in JEDEM Fall intialisiert
@quakergod: nachdem ich für CaseSensitive einen DefaultWert (=True) zugewiesen habe, brauchst du die Funktion auch nur mit 2 Parametern weglassen. Wenn der 3. Parameter True sein soll, lass ihn weg. Dann wird auch auf die Groß-/Kleinschreibung geachtet.
Greetz
alcaeus