Добрый вечер скажите как можно вести подсчет строк в StatusBar.
У меня есть ListBox в который я буду заносить данные, а в StatusBar мне бы хотелось видеть кол-во строк.

Так же если можно покажите на примере TreeView, т.е. подсчет кол-ва папок и подпапок.

Если кроме кол-ва строк в статусбар больше ничего выводить не нужно, то ставите галку SimplePanel. И теперь в SimpleText можно заносить нужный текст.
Если у вас ещё что-то будет в статусбаре, то создаёте нужное кол-во панелей. У каждой панели есть свойство Text.

В нужном месте кода (после изменения кол-ва строк в листбоксе) пишите:


Это сообщение отредактировал(а) Rrader - 11.1.2010, 19:54

artsb, Добрый день!!!!
У меня Delphi 7 и я там не могу поставить галочку.

Если можно поподробнее написать что, как и где писать?
П.С.: Я новичек 

SimplePanel = True в свойствах StatusBar'а.

Данкинг, 
при изменении SimplePanel в True с понели у меня пропадают все панели.

Сори. Я не правильно выразился. Я имел ввиду выставить значение true. Данкинг уже написал.

artsb, 

Это все понятно, но что писать в самой программе? Я думаю что необходимо ч-то прописывать чтоб он мог считывать кол-ко строк и выводить его StatusBar.
А что касается кол-ва панелей то их действительно должно быть 5 или 6 шт.
И еще, artsb, Вы наверно меня не так поняли. Я же в начале писал, что у меня есть  ListBox в котором есть строки с данными. Так вот мне необходимо чтоб вот эти строки (в  ListBox) подсчитываличь и отображались в одной из панелей StatusBar.

Пример:
В ListBox написано:
1. Кузов
2. Консервы
3. Мыло
4. CD-R
В ListBox (в одной из панелей):
Кол-во: 4 (или можно так: Кол-во: 4 шт.)

artsb, 
ща буду пробовать!!!

Не забудьте создать панели: либо двойной клик по самому StatusBar, либо свойство Panels в ObjectInspector'е ;)

artsb, 

А можете написать полный код.
У меня есть PageControl в ней TreeView. В TreeView иерархический список папок. Вот мне бы хотелось чтоб у меня в StatusBar отображалось и кол-во папок и кол-во подпапок в разных панелях.
То что Вы мне пердложили у меня не получается, может я ч-то не дописал или неправильно оформил.

Добавлено через 12 минут и 16 секунд
artsb,

 

С папками разобрался!!!!!!!!! Необходимо было вставить Timer. Осталось с подпапками.

Стоп, стоп, стоп! Какой таймер? Зачем он там нужен?


Я себе это не могу представить. Можете привести пример?

Вот вам пример. Написал на Delphi 2010. Старее нет.

Присоединённый файл ( Кол-во скачиваний: 6 )
 tree_example.rar 321,30 Kb

artsb, 

А че? У меня с таймером все получилось!!!!

Если получилось, это не значит что так правильно. Я прикрепил пример. Посмотрите его.

ЗЫ Я даже представить себе не могу, как там можно было использовать таймер...

Это сообщение отредактировал(а) artsb - 29.1.2010, 20:02