readonly Treeview - как? / Microsoft Access

ReSQL.ru

2.0.54

Полная версия Контакт Правила FAQ Помощь

Гость

Войти | Профиль | Очистить

Нов. | Гор. | Избр.

Написать

Автор*:

Ввести пароль для входа

Тема*:

Сообщение

Данное сообщение тематическое

Сообщение содержит картинки или видео 18+

Автор:

ВНИМАНИЕ! На данном подфоруме действуют строгие правила. Удостоверьтесь, что ваше сообщение соответствует им!

Форум или тема закрыты для гостей. Необходима авторизация!

Загрузить последнюю сохраненную версию

Вставить как галерею

Максимальный размер вложений: 4,0 МБ, аудио/видео: 8,0 МБ. Картинки большего размера ужимаются, если возможно.

Введите код, изображенный на картинке. Если код нечитаемый, кликните картинку, чтобы загрузить другой вариант.

Отправляя сообщение, я выражаю свое согласие с правилами форума и принимаю пользовательское соглашение.

Действия ...

Доб. в избранное
Игнор. тему
Прикреп. тему
Пометить прочит. / непрочит.
Фильтр:
Сообщения автора темы
Сообщение содержит вложения
Сообщение содержит картинки
Сообщение содержит видеоклипы
Сообщение содержит аудиоклипы
Сообщение содержит картинки или видео 18+

Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / readonly Treeview - как? / 9 сообщений из 9, страница 1 из 1

10.01.2017, 11:07

#39381286

NVT

Участник

Откуда: Санкт-Петербург
Сообщения: 184
Рейтинг: 0 / 0

readonly Treeview - как?

Добрый день!

Как сделать дерево доступным только для чтения?

Т.е. форма открывается с allowedits = false, и пользователь не должен иметь возможность что-то отмечать в дереве, но ему на это пофиг. Галки снимаются и ставятся.

Установка свойства Enabled = false не подходит, т.к. невозможно прокрутить дерево вниз, что бы увидеть скрытую часть. Свойства Locked у екуумшуц нет...

Пробовал сделать отмену события NodeCheck через таймер, но работает криво.

Есть ли иной способ показать дерево только для чтения?

Спасибо

ЗЫ: поиск не помог

...

Рейтинг:

0 / 0

| Ответить | Цитировать | Написать

10.01.2017, 12:04

#39381347

POKEP

Гость

readonly Treeview - как?

Если в конструкторе формы свойство "Разрешить изменение" установлено в "Нет", то, как вариант, можно в коде VBA поискать (или присвоить) явное изменение свойства Me.AllowEdits формы в обработках событий Form_Open() или Form_Current(). А также на обработках событий получения фокуса (типа Поле_GotFocus()) некоторыми полями формы.

...

Рейтинг:

0 / 0

| Ответить | Цитировать | Написать

10.01.2017, 12:08

#39381351

NVT

Участник

Откуда: Санкт-Петербург
Сообщения: 184
Рейтинг: 0 / 0

readonly Treeview - как?

POKEP,

Увы, но Me.AllowEdits уже = false, и другие контролы (поля, чекбокс и т.п.) недоступны для редактирования, а вот дереву как-то ровно на это.

...

Рейтинг:

0 / 0

| Ответить | Цитировать | Написать

10.01.2017, 12:18

#39381366

а так?

Гость

readonly Treeview - как?

Код: vbnet

1.
2.
3.

Private Sub Tr_NodeCheck(ByVal Node As Object)
    Node.Checked = Not Node.Checked
End Sub

...

Рейтинг:

0 / 0

| Ответить | Цитировать | Написать

10.01.2017, 13:49

#39381458

NVT

Участник

Откуда: Санкт-Петербург
Сообщения: 184
Рейтинг: 0 / 0

readonly Treeview - как?

а так?,

если бы было все так просто )))
тут про это написано, посмотрите, пригодится

...

Рейтинг:

0 / 0

| Ответить | Цитировать | Написать

10.01.2017, 14:09

#39381485

Akina

Участник

Откуда: Зеленоград, Москва, Россия
Сообщения: 20 644
Рейтинг: 0 / 0

readonly Treeview - как?

Код: vbnet

1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.

Dim col As New Collection

Private Sub Form_Load()
Timer1.Interval = 10
Timer1.Enabled = True
End Sub

Private Sub Timer1_Timer()
If col.Count > 0 Then
    TreeView1.Nodes(col.Item(1)).Checked = False
    col.Remove 1
End If
End Sub

Private Sub TreeView1_NodeCheck(ByVal Node As MSComctlLib.Node)
col.Add Node.Index
End Sub

...

Рейтинг:

0 / 0

| Ответить | Цитировать | Написать

10.01.2017, 14:11

#39381491

Akina

Участник

Откуда: Зеленоград, Москва, Россия
Сообщения: 20 644
Рейтинг: 0 / 0

readonly Treeview - как?

PS. Это код для VB6. Адаптируйте под Access, это несложно.

...

Рейтинг:

0 / 0

| Ответить | Цитировать | Написать

10.01.2017, 14:47

#39381532

NVT

Участник

Откуда: Санкт-Петербург
Сообщения: 184
Рейтинг: 0 / 0

readonly Treeview - как?

Akina,

как я понял, это по типу того, что я привел выше по ссылке.
Пришлось (пока) так и сделать...

...

Рейтинг:

0 / 0

| Ответить | Цитировать | Написать

10.01.2017, 15:05

#39381558

Akina

Участник

Откуда: Зеленоград, Москва, Россия
Сообщения: 20 644
Рейтинг: 0 / 0

readonly Treeview - как?

NVTэто по типу того, что я привел выше по ссылке.Подход немного другой, запоминается не сама нода, а набивается коллекция индексов почеканных нод. Как следствие, код устойчив к пропуску срабатываний таймера - элемент удаляется только после сброса чекбокса. Так что после небольшого подпиливания он пригоден и для случая, когда выделяется и затем чекается сразу группа нодов.

...

Рейтинг:

0 / 0

| Ответить | Цитировать | Написать

Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / readonly Treeview - как? / 9 сообщений из 9, страница 1 из 1

Читали тему (0):

Читали форум (0):

Пользователи онлайн (0):

start [/forum/topic.php?fid=45&tablet=1&tid=1612823]:	0ms
get settings:	12ms
get forum list:	12ms
check forum access:	4ms
check topic access:	4ms
track hit:	119ms
get topic data:	11ms
get forum data:	2ms
get page messages:	47ms
get tp. blocked users:	1ms
others:	350ms

total:	562ms