powered by simpleCommunicator - 2.0.56     © 2025 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Oracle Forms [игнор отключен] [закрыт для гостей] / Отображение иконки в меню ввиде дерево
7 сообщений из 7, страница 1 из 1
Отображение иконки в меню ввиде дерево
    #37475376
Бакыт
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
здравствуйте, всем
в настоящее время разрабатываю меню сделал ввиде дерево все получилось единственное хочу отображалась иконки
пример на фотке
...
Рейтинг: 0 / 0
Отображение иконки в меню ввиде дерево
    #37475405
Бакыт
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
хотелось бы вот так
...
Рейтинг: 0 / 0
Отображение иконки в меню ввиде дерево
    #37476504
Алымов Анатолий
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Дерево формируете на базе запроса?
Я на 6-х формсах делал так:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
htree := Find_Item('tree');
	que := 
		 'SELECT -1, LEVEL, t.label, ''pics\''||lower(t.command_type), to_char(ID)
			FROM menu_table t
			WHERE visible=''Y''
			START WITH t.main_item_id = 1 AND t.visible=''Y''
			CONNECT BY t.main_item_id = PRIOR t.id
			order SIBLINGS by num
			'
	;

	ftree.set_tree_property
		( htree
		, ftree.query_text
		, que
		);
ftree.populate_tree('tree');

command_type - название файлика иконки в формате ico без расширения - лежат у меня в подпапке pics.
...
Рейтинг: 0 / 0
Отображение иконки в меню ввиде дерево
    #37476733
_мод
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Бакытхотелось бы вот так
см. set_tree_node_property(......)
там указывается имя файла *.ico
...
Рейтинг: 0 / 0
Отображение иконки в меню ввиде дерево
    #37477020
Бакыт
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
_модБакытхотелось бы вот так
см. set_tree_node_property(......)
там указывается имя файла *.ico
на какой триггер прописать чтобы при формировании "листа" автоматически присвоил ?
я сейчас подцепил на
mouse doble click
when-tree-node-expanded
when-tree-node-selected
when-tree-node-activated


а именно нажатие на "+" триггер не могу найти
...
Рейтинг: 0 / 0
Отображение иконки в меню ввиде дерево
    #37477026
Бакыт
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Алымов АнатолийДерево формируете на базе запроса?
Я на 6-х формсах делал так:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
htree := Find_Item('tree');
	que := 
		 'SELECT -1, LEVEL, t.label, ''pics\''||lower(t.command_type), to_char(ID)
			FROM menu_table t
			WHERE visible=''Y''
			START WITH t.main_item_id = 1 AND t.visible=''Y''
			CONNECT BY t.main_item_id = PRIOR t.id
			order SIBLINGS by num
			'
	;

	ftree.set_tree_property
		( htree
		, ftree.query_text
		, que
		);
ftree.populate_tree('tree');

command_type - название файлика иконки в формате ico без расширения - лежат у меня в подпапке pics.

вот мой код
procedure build_tree is
htree item := find_item('htree');
new_node ftree.node;

cursor roots is
select empno, ename from emp where mgr is null order by ename; -- сей курсор содержит корневые пункты
cursor subs (inempno number) is
select count(empno) issub from emp where mgr = inempno; -- количество детей

lnsub number;

ln number := 0;

begin

for root_rec in roots loop
ln := ln+1;

open subs(root_rec.empno);
fetch subs into lnsub;
close subs;

if lnsub > 0 then -- добавление ветки
new_node := ftree.add_tree_node(
htree,
ftree.root_node,
ftree.parent_offset,
ftree.last_child,
ftree.collapsed_node,
root_rec.ename,
'',
root_rec.empno
);
else -- добавление листа
new_node := ftree.add_tree_node(
htree,
ftree.root_node,
ftree.parent_offset,
ftree.last_child,
ftree.leaf_node,
root_rec.ename,
'',
root_rec.empno
);
end if;

if ln = 1 then
ftree.set_tree_selection(htree, new_node, ftree.select_on);
end if;

end loop;

end;
...
Рейтинг: 0 / 0
Отображение иконки в меню ввиде дерево
    #37478418
_мод
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
[quot Бакыт][quot _мод]
when-tree-node-expanded

- это и есть нажатие на +

там можно менять иконку
...
Рейтинг: 0 / 0
7 сообщений из 7, страница 1 из 1
Форумы / Oracle Forms [игнор отключен] [закрыт для гостей] / Отображение иконки в меню ввиде дерево
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]