Szukanie po Itemie ImageList'a

0

Siemka, mam problem a mianowicie niewiem jak zrobić, żeby na Label'u pokazywalo mi ile jest itemów w TreeView, ale tylko o ImageIndex := 1; Może ktoś wie, bardzo proszę o pomoc :-/

0
var
  i: integer;
  ImgItemsCount: byte;
begin
  ImgItemsCount := 0;
  for i := 0 to tree.Items.Count - 1 do
  begin
    if tree.Items[i].ImageIndex = 1 then
      Inc(ImgItemsCount);
  end;
0

Kurcze troche mam problemy z przekształceniem tego, ponieważ mam to dodać do:

StatusBar1.Panels[1].Text := '      Aktywnych komputerów w sieci: ' + 

, może pomożecie z tym ? :)

0
StatusBar1.Panels[1].Text := 'Aktywnych komputerów w sieci: ' + IntToStr(ImgItemsCount)
0

Stokrotne dzięki [browar]

Zarejestruj się i dołącz do największej społeczności programistów w Polsce.

Otrzymaj wsparcie, dziel się wiedzą i rozwijaj swoje umiejętności z najlepszymi.