Работа БД и TreeView -> Форум на Исходниках.Ру

	Наши проекты: Журнал · Discuz!ML · Wiki · DRKB · Помощь проекту

Здравствуйте, Гость ! [3.135.202.224]

ПРАВИЛА РАЗДЕЛА · FAQ раздела Delphi

Пожалуйста, выделяйте текст программы тегом [сode=pas] ... [/сode]. Для этого используйте кнопку [code=pas] в форме ответа или комбобокс, если нужно вставить код на языке, отличном от Дельфи/Паскаля.

Обязательно указание:
1) типа базы данных (Paradox/Oracle/Interbase и т.п.)
2) способа доступа к базе данных (ODBC/ADO/DAO/BDE и т.п.)
Например: Paradox/BDE, MS Access/ADO

Наиболее часто задаваемые вопросы:
Базы даных для начинающих. Первые шаги. Понятие о BDE.
Переход на клиент-сервер и начала ADO
Приёмы работы с BLOB (OLE/Memo) полями
Запросы и параметры или как избавиться от многих проблем. Проблемы с датами в запросах.
Нужели мне нужно устанавливать BDE? (или почему не работает программа на другом компьютере)

Модераторы: Bas, Rouse_

Новое голосование

Работа БД и TreeView , (БД = Paradox)

Trimlianin

Сообщ. #1 , 28.11.03, 17:03

Unregistered

Есть БД с записями типа:
Группа | Ник |
-----------------
One | 1 |
Two | 2 |
Three | 3 |
One | 11 |
-----------------

Я вывожу все группы в корень TreeView.
Должно получится вроде этого:

+One---
| |_1
| |_11
|
+Two---
| |_2
|
+Three-
|_3

Как мне узнать, есть ли уже в корне такая группа или нет?

Сообщение отредактировано: Trimlianin - 28.11.03, 17:05

Vit	Сообщ. #2 , 28.11.03, 18:45
Guru Профиль · PM Поощрения: 16 Dgm Рейтинг (т): 181	Пройти по узлам в цикле.

Trimlianin	Сообщ. #3 , 28.11.03, 21:08
Unregistered	Например?

Vit

Сообщ. #4 , 29.11.03, 01:22

Guru

Профиль · PM

Поощрения: 16 Dgm

Рейтинг (т): 181

Как-то так, присал на вскидку (возможны мелкие ошибки, не помню там items или nodes и т.п.):

Function isNodePresent(Name:string):boolean;
begin
result:=false;
For i:=0 to TreeView.items.count-1 do
if TreeView.items[i].level=0 then
if Name=TreeView.items[i].text then
begin
result:=true;
exit;
end;
end;

Trimlianin	Сообщ. #5 , 29.11.03, 09:02
Unregistered	Vit, спасибо

0 пользователей читают эту тему (0 гостей и 0 скрытых пользователей)

0 пользователей:

[ Script execution time: 0,0193 ] [ 17 queries used ] [ Generated: 16.04.24, 22:43 GMT ]