Модераторы: Poseidon, Snowy, bems, MetalFan
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Treeview items 
V
    Опции темы
namra
Дата 11.2.2009, 01:50 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 355
Регистрация: 26.4.2007

Репутация: нет
Всего: нет
Здравствуйте, подскажите как проверить есть ли в Treeview -> items (записи) или нет?
PM MAIL   Вверх
Kbl4AH
Дата 11.2.2009, 09:24 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 741
Регистрация: 1.4.2008
Где: Вятка

Репутация: 1
Всего: 15
Код

  if TreeView1.Items.Count = 0 then
    ShowMessage('Нет')
  else
    ShowMessage('Есть');
PM MAIL ICQ   Вверх
namra
Дата 13.2.2009, 00:06 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 355
Регистрация: 26.4.2007

Репутация: нет
Всего: нет
все время выдает что есть хотя treeview пустой

Это сообщение отредактировал(а) namra - 13.2.2009, 00:07
PM MAIL   Вверх
Kbl4AH
Дата 13.2.2009, 00:09 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 741
Регистрация: 1.4.2008
Где: Вятка

Репутация: 1
Всего: 15
Код напиши, особенно заполнения дерева...
PM MAIL ICQ   Вверх
Poseidon
Дата 13.2.2009, 00:34 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Delphi developer
****


Профиль
Группа: Комодератор
Сообщений: 5273
Регистрация: 4.2.2005
Где: Гомель, Беларусь

Репутация: 53
Всего: 133
В дереве может быть узел, но он будет пустым, поэтому создастся впечатление что и дерево пустое. Посмотри в TreeWiev Items Editor есть ли реально узлы.


--------------------
Если хочешь, что бы что-то работало - используй написанное, 
если хочешь что-то понять - пиши сам...
PM MAIL ICQ   Вверх
namra
Дата 13.2.2009, 00:38 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 355
Регистрация: 26.4.2007

Репутация: нет
Всего: нет
При событии Onshow  для формы в дерево загружаются записи:
 TreeView2.LoadFromFile(GetCurrentDir+'\Tree.txt')
При закрытии должен проверять есть ли записи в treeview (т.е. заполнен он или нет)?
PM MAIL   Вверх
Kbl4AH
Дата 13.2.2009, 00:54 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 741
Регистрация: 1.4.2008
Где: Вятка

Репутация: 1
Всего: 15
проверил, у меня все работает:
Код

procedure TForm1.Button1Click(Sender: TObject);
begin
  TreeView1.LoadFromFile(GetCurrentDir+'\Tree.txt')
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
  if TreeView1.Items.Count = 0 then
    ShowMessage('Нет')
  else
    ShowMessage('Есть - ' + IntToStr(TreeView1.Items.Count));
end;

Если у тебя в дереве не отображено элементов, но проверка говорит, что они есть, значит у тебя в Tree.txt есть непечатаемые символы (пробелы или скорее #13#10)...
Проверь, размер файла равен нулю? Если нет, то проверка будет говорить, что элементы есть... Если да, то - нет...

Это сообщение отредактировал(а) Kbl4AH - 13.2.2009, 01:10
PM MAIL ICQ   Вверх
namra
Дата 13.2.2009, 02:07 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 355
Регистрация: 26.4.2007

Репутация: нет
Всего: нет
Ок! Все работает, ведать где-то я не то писал что-ли. СПС +1
PM MAIL   Вверх
  
 Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Общие вопросы"
SnowyMetalFan
bemsPoseidon
Rrader

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по Дельфи обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи

Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, MetalFan, bems, Poseidon, Rrader.
 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: Общие вопросы | Следующая тема »

Подписаться на тему | Подписка на этот форум | Скачать/Распечатать тему


 




[ Время генерации скрипта: 0.0769 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
 По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.