powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / TreeView - внешний вид и не только
5 сообщений из 5, страница 1 из 1
TreeView - внешний вид и не только
    #33410646
Snow_lamer
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Уважаемые знатоки !!
Осваиваю дерево, и вроде все у меня получается - и дерево растет, и справочник корректируется замечательно, и фон меняется (спасибо сайту Юрия Шутенко). Но на одном моменте заклинило - не могу сообразить, как вывести в дерево оглавление диска. М.б, кто-нибудь найдет время и бросит пример.

И второе - в моем дереве при установлении курсора на запись, она (запись) как бы дублируется, примерно, как если на кнопке установить ToolTipText. Как от этого избавиться ? ( FullRowSelect и HotTracking на это не влияют.)
...
Рейтинг: 0 / 0
TreeView - внешний вид и не только
    #33410716
Петров Андрей
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Как вывести сам дотумкаешь а вот как считать каталоги - смотри функцию ADIR()

Опять же есть GetDir() для выбора каталога...
...
Рейтинг: 0 / 0
TreeView - внешний вид и не только
    #33410902
Snow_lamer
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Уважаемый Петров Андрей !
Большое вам человеческое спасибо !! То, что надо.
...
Рейтинг: 0 / 0
TreeView - внешний вид и не только
    #33410943
Snow_lamer
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Уважаемый Петров Андрей !
Большое вам человеческое спасибо !! То, что надо.
...
Рейтинг: 0 / 0
TreeView - внешний вид и не только
    #33415381
Igor Korolyov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Hi Snow_lamer!

> И второе - в моем дереве при установлении курсора на запись, она (запись)
> как бы дублируется, примерно, как если на кнопке установить ToolTipText

Это наверное он и есть (других вариантов я представить не могу :) ). Для
начала - при добавлении в дерево отрезай хвостовые пробелы - тогда эта
"подсказка" будет появляться только для тех элементов, которые реально не
поместились по ширине в дерево. Ну а "вообще" отключить подсказки можно
таким вот кодом - это Assign метод свойства, которое я добавил к своему
классу дерева:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
PROCEDURE lItemTips_Assign
LPARAMETERS tlNewVal
#DEFINE GWL_STYLE (- 16 )
#DEFINE WS_EX_TOOLWINDOW 0x80
IF VARTYPE(m.tlNewVal) # "L"
 ERROR  1732 
 RETURN .F.
ENDIF
This.lItemTips = m.tlNewVal
DECLARE INTEGER GetWindowLong IN WIN32API INTEGER, INTEGER
DECLARE INTEGER SetWindowLong IN WIN32API INTEGER, INTEGER, INTEGER
LOCAL lnStyle
lnStyle = GetWindowLong(This.Object.hWnd, GWL_STYLE)
lnStyle = IIF(m.tlNewVal, BITAND(m.lnStyle, BITNOT(WS_EX_TOOLWINDOW)), ;
  BITOR(m.lnStyle, WS_EX_TOOLWINDOW))
=SetWindowLong(This.Object.hWnd, GWL_STYLE, m.lnStyle)
ENDPROC


Posted via ActualForum NNTP Server 1.3
...
Рейтинг: 0 / 0
5 сообщений из 5, страница 1 из 1
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / TreeView - внешний вид и не только
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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