tree items zählen die rot markiert sind

**Micha**

Ich habe für einen Tree eine Suchfunktion gebastelt. (siehe Code unten)

In ein Edit gibt man den Suchbegriff ein, mit einem Button-Click werden dann die Items rot markiert, die den Such-Begriff enthalten.

Nun möchte ich noch die Anzahl der Items ausgeben, die gefunden wurden.
Kann mir bitte wer weiterhelfen?

zusammenfalten · markieren

Delphi-Quellcode:

			procedure TForm1.treeCustomDrawItem(Sender: TCustomTreeView;

  Node: TTreeNode; State: TCustomDrawState; var DefaultDraw: Boolean);

var

 i : integer;

  begin

// LowerCase = Umwandlung in Kleinbuchstaben.

   if Pos(LowerCase(edt_suchen.text),LowerCase(node.text))>0 then

   begin

     tree.Canvas.Font.Color := clred;

     ShowMessage(inttostr(tree.Items.Count)); //Gibt die Anzahl aller Datensätze aus

   end;

end;

tree items zählen die rot markiert sind

tree items zählen die rot markiert sind

Forumregeln