ReSQL.ru
     
powered by simpleCommunicator - 2.0.48     © 2025 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Enabled & Focus
25 сообщений из 27, страница 1 из 2
  1  все
Enabled & Focus
    #36810488
IFK
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
IFK
Гость
Уважаемый народ!

Может и боян, но не нашел на форуме решение по следующему вопросу: на подформе необходимо заблокировать поля от редактирования. Пробегаю по всем и блокирую:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
    For Each v In Me.Section( 0 ).Controls
        If Right(v.Name,  5 ) = "Label" Or Left(v.Name,  5 ) = "Label" Then
        Else:
            v.Locked = True
            If InStr( 1 , v.Name, "OrderStatus", vbTextCompare) =  0  Then
                v.Enabled = False
            Else:
                me.BAP.SetFocus
                v.Enabled = False <= тута ругается
            End If
        End If
    Next v
Свойство Locked становится на ура для всех полей. А свойство Enabled глючит только для поля "OrderStatus". Для поля "OrderStatus" ругается, что не может присвоить значение свойству, т.к. контрол активен. Пробовал убрать фокус нах с этого поля, но нихрена не выходит: Me.BAP.SetFocus не срабатывает, показывает только доступное свойство Value.
...
Рейтинг: 0 / 0
25.08.2010, 14:06
| Ответить | Цитировать | Написать  
Enabled & Focus
    #36810492
ё
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ё
Гость
IFKМожет и боян, но не нашел на форуме решение по следующему вопросу
...
боян-боян,

надо было с ФАКа начать
...
Рейтинг: 0 / 0
25.08.2010, 14:08
| Ответить | Цитировать | Написать  
Enabled & Focus
    #36810507
IFK
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
IFK
Гость
ёIFKМожет и боян, но не нашел на форуме решение по следующему вопросу
...
боян-боян,

надо было с ФАКа начать

А по-конкретнее можно, пожалуйста, с какого именно раздела ФАКа?
...
Рейтинг: 0 / 0
25.08.2010, 14:15
| Ответить | Цитировать | Написать  
Enabled & Focus
    #36810641
Фотография mds_world
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
mds_world
Участник
IFK,

1. возможно поля уже недоступны куда вы хотите перенести фокус.
2. Если сделать недоступными все поля на форме, то форма тоже станет недоступной. И могут быть трудности с управлением.
3. Если требуется заблокировать поля, то Locked это уже дает. Зачем еще Enabled?
4. Если нужно для всей формы запретить изменения, то вполне достаточно (и правильно) воспользоваться свойством формы AllowEdits равным False. И цикла не требуется.
...
Рейтинг: 0 / 0
25.08.2010, 14:43
| Ответить | Цитировать | Написать  
Enabled & Focus
    #36810651
IFK
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
IFK
Гость
mds_worldIFK,

1. возможно поля уже недоступны куда вы хотите перенести фокус.
2. Если сделать недоступными все поля на форме, то форма тоже станет недоступной. И могут быть трудности с управлением.
3. Если требуется заблокировать поля, то Locked это уже дает. Зачем еще Enabled?
4. Если нужно для всей формы запретить изменения, то вполне достаточно (и правильно) воспользоваться свойством формы AllowEdits равным False. И цикла не требуется.

Enabled = False нужно, чтобы список не открывался для поля со списком.
Ага, спасибо! Про AllowEdits не подумал. :)
...
Рейтинг: 0 / 0
25.08.2010, 14:46
| Ответить | Цитировать | Написать  
Enabled & Focus
    #36810893
ё
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ё
Гость
IFKёIFKМожет и боян, но не нашел на форуме решение по следующему вопросу
...
боян-боян,

надо было с ФАКа начать

А по-конкретнее можно, пожалуйста, с какого именно раздела ФАКа?
http://www.sql.ru/faq/faq_topic.aspx?fid=213
Q30
...
Рейтинг: 0 / 0
25.08.2010, 15:45
| Ответить | Цитировать | Написать  
Enabled & Focus
    #36811029
IFK
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
IFK
Гость
ёIFKёIFKМожет и боян, но не нашел на форуме решение по следующему вопросу
...
боян-боян,

надо было с ФАКа начать

А по-конкретнее можно, пожалуйста, с какого именно раздела ФАКа?
http://www.sql.ru/faq/faq_topic.aspx?fid=213
Q30

Спасибо, но фокус не переводится. Я уже писал об этом. :(
...
Рейтинг: 0 / 0
25.08.2010, 16:14
| Ответить | Цитировать | Написать  
Enabled & Focus
    #36811056
ё
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ё
Гость
IFK...
Спасибо, но фокус не переводится. Я уже писал об этом. :(
IFK
Код: plaintext
1.
2.
me.BAP.SetFocus
v.Enabled = False <= тута ругается

я незнаю, что такое BAP, и почему на него не переводится фокус,
но по ссылке в ФАКе есть метод решения для таких случаев - прозрачный контрол , на который и перебрасывается фокус
...
Рейтинг: 0 / 0
25.08.2010, 16:20
| Ответить | Цитировать | Написать  
Enabled & Focus
    #36811074
IFK
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
IFK
Гость
ёIFK...
Спасибо, но фокус не переводится. Я уже писал об этом. :(
IFK
Код: plaintext
1.
2.
me.BAP.SetFocus
v.Enabled = False <= тута ругается

я незнаю, что такое BAP, и почему на него не переводится фокус,
но по ссылке в ФАКе есть метод решения для таких случаев - прозрачный контрол , на который и перебрасывается фокус

BAP - это имя поля в подформе. Метод из фака видел. А без него никак?
...
Рейтинг: 0 / 0
25.08.2010, 16:23
| Ответить | Цитировать | Написать  
Enabled & Focus
    #36811230
ё
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ё
Гость
IFK...
BAP - это имя поля в подформе. Метод из фака видел. А без него никак?
если фокус находился в главной форме, то для передачи на контрол в подчинённой,
(если не ошибаюсь ?), нужно сначала передать фокус контролу "подчинённая форма", а уже потом - в контрол (поле) подчинённой
...
Рейтинг: 0 / 0
25.08.2010, 16:57
| Ответить | Цитировать | Написать  
Enabled & Focus
    #36811244
IFK
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
IFK
Гость
ёIFK...
BAP - это имя поля в подформе. Метод из фака видел. А без него никак?
если фокус находился в главной форме, то для передачи на контрол в подчинённой,
(если не ошибаюсь ?), нужно сначала передать фокус контролу "подчинённая форма", а уже потом - в контрол (поле) подчинённой

Так в том то и дело, что фокус уже находится на поле в подформе, иначе не ругалось бы. :(
...
Рейтинг: 0 / 0
25.08.2010, 16:59
| Ответить | Цитировать | Написать  
Enabled & Focus
    #36811286
ё
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ё
Гость
1
IFK
Me.BAP.SetFocus не срабатывает, показывает только доступное свойство Value

это обозначает, что на форме НЕТ контрола-поля с именем BAP,
а есть только поле данных в источнике, с таким именем,
куда вы его переносите-то, если этого "куда" - несуществует ??
2
Код: plaintext
1.
For Each v In Me.Section( 0 ).Controls
раз уж Enabled-ся все контролы (не лейблы) в области данных, то
это поле (BAP) - должно быть НЕ в области данных
и перенести фокус стоит ДО цикла
...
Рейтинг: 0 / 0
25.08.2010, 17:12
| Ответить | Цитировать | Написать  
Enabled & Focus
    #36811316
IFK
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
IFK
Гость
ё1
IFK
Me.BAP.SetFocus не срабатывает, показывает только доступное свойство Value

это обозначает, что на форме НЕТ контрола-поля с именем BAP,
а есть только поле данных в источнике, с таким именем,
куда вы его переносите-то, если этого "куда" - несуществует ??
2
Код: plaintext
1.
For Each v In Me.Section( 0 ).Controls
раз уж Enabled-ся все контролы (не лейблы) в области данных, то
это поле (BAP) - должно быть НЕ в области данных
и перенести фокус стоит ДО цикла

Нет, на подформе есть однозначно: находит его если задать Me. - в списке есть. Я только не понимаю, какого Акс дает только одно свойство в списке после . ? Перенос фокуса из подформы на форму перед циклом тоже ничего не изменил.
...
Рейтинг: 0 / 0
25.08.2010, 17:20
| Ответить | Цитировать | Написать  
Enabled & Focus
    #36811342
ё
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ё
Гость
IFKНет, на подформе есть однозначно: находит его если задать Me. - в списке есть.
...
а я и не говорил, что в списке не будет,
я говорю, что нет визуального поля-контрола с именем BAP,
а есть поле данных источника с именем BAP (вот оно то в списке после Me. и есть) - и на него - перенести фокус нельзя! - оно не имеет визуального представления
...
Рейтинг: 0 / 0
25.08.2010, 17:27
| Ответить | Цитировать | Написать  
Enabled & Focus
    #36811360
IFK
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
IFK
Гость
ёIFKНет, на подформе есть однозначно: находит его если задать Me. - в списке есть.
...
а я и не говорил, что в списке не будет,
я говорю, что нет визуального поля-контрола с именем BAP,
а есть поле данных источника с именем BAP (вот оно то в списке после Me. и есть) - и на него - перенести фокус нельзя! - оно не имеет визуального представления

Как понимать "не имеет визуального представления"? Это связанное поле, его видно на форме. )))
...
Рейтинг: 0 / 0
25.08.2010, 17:36
| Ответить | Цитировать | Написать  
Enabled & Focus
    #36811370
ё
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ё
Гость
IFKКак понимать "не имеет визуального представления"? Это связанное поле, его видно на форме. )))

...мляяя...
да проверь ты имя у этого контрола, раз "его видно на форме"
имя будет - не BAP,
может - "на русском" написал...
...
Рейтинг: 0 / 0
25.08.2010, 17:40
| Ответить | Цитировать | Написать  
Enabled & Focus
    #36811378
Фотография mds_world
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
mds_world
Участник
Когда выйдете на ошибку в Immediate опросите
?typename(Me.BAP)
?Me.BAP.Enabled
...
Рейтинг: 0 / 0
25.08.2010, 17:42
| Ответить | Цитировать | Написать  
Enabled & Focus
    #36811389
IFK
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
IFK
Гость
ёIFKКак понимать "не имеет визуального представления"? Это связанное поле, его видно на форме. )))

...мляяя...
да проверь ты имя у этого контрола, раз "его видно на форме"
имя будет - не BAP,
может - "на русском" написал...

Мля, да его проверял уже раз 5, еще до того, как запостил свой вопрос.
...
Рейтинг: 0 / 0
25.08.2010, 17:46
| Ответить | Цитировать | Написать  
Enabled & Focus
    #36811393
IFK
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
IFK
Гость
mds_worldКогда выйдете на ошибку в Immediate опросите
?typename(Me.BAP)
?Me.BAP.Enabled

Опросил.
На первую команду выдает "AccessField"
На вторую ругается "Method or data member not found"
...
Рейтинг: 0 / 0
25.08.2010, 17:49
| Ответить | Цитировать | Написать  
Enabled & Focus
    #36811398
ё
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ё
Гость
IFKМля, да его проверял уже раз 5, еще до того, как запостил свой вопрос.
выложи пример
...
Рейтинг: 0 / 0
25.08.2010, 17:51
| Ответить | Цитировать | Написать  
Enabled & Focus
    #36811435
IFK
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
IFK
Гость
ёIFKМля, да его проверял уже раз 5, еще до того, как запостил свой вопрос.
выложи пример

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
    
     For Each v In Me.Section( 0 ).Controls
        If Right(v.Name,  5 ) = "Label" Or Left(v.Name,  5 ) = "Label" Then
        Else:
            If v.Name = "fin_BAP" Then v.SetFocus
            v.Locked = True
            If InStr( 1 , v.Name, "OrderStatus", vbTextCompare) =  0  Then
                v.Enabled = False
            Else:
                v.Enabled = False <= все равно тут ругается
            End If
        End If
    Next v
...
Рейтинг: 0 / 0
25.08.2010, 18:08
| Ответить | Цитировать | Написать  
Enabled & Focus
    #36811438
Фотография mds_world
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
mds_world
Участник
IFKmds_worldКогда выйдете на ошибку в Immediate опросите
?typename(Me.BAP)
?Me.BAP.Enabled

Опросил.
На первую команду выдает "AccessField"
На вторую ругается "Method or data member not found"
Такого не видел еще - "AccessField". У вас какой акс?

И чтобы метода Enabled не было у поля, оно не должно в принципе уметь принимать фокус.

Если сможете, как уже говорил ё, выложить примерчик в формате не выше 2003, можно будет посмотреть.
...
Рейтинг: 0 / 0
25.08.2010, 18:09
| Ответить | Цитировать | Написать  
Enabled & Focus
    #36811447
IFK
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
IFK
Гость
mds_worldIFKmds_worldКогда выйдете на ошибку в Immediate опросите
?typename(Me.BAP)
?Me.BAP.Enabled

Опросил.
На первую команду выдает "AccessField"
На вторую ругается "Method or data member not found"
Такого не видел еще - "AccessField". У вас какой акс?

И чтобы метода Enabled не было у поля, оно не должно в принципе уметь принимать фокус.

Если сможете, как уже говорил ё, выложить примерчик в формате не выше 2003, можно будет посмотреть.

Акс 2003. Пример выше. Для всех полей работает, а только для одного не работает, потому что оно по мнению Акса имеет фокус, прошу прощения за каламбур.
...
Рейтинг: 0 / 0
25.08.2010, 18:13
| Ответить | Цитировать | Написать  
Enabled & Focus
    #36811467
ё
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ё
Гость
mds_worldТакого не видел еще - "AccessField". У вас какой акс?

это то, о чём я говорил
вот (контрола-поля "value" на форме - нет)
...
Рейтинг: 0 / 0
25.08.2010, 18:22
| Ответить | Цитировать | Написать  
Enabled & Focus
    #36811472
ё
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ё
Гость
...
Рейтинг: 0 / 0
25.08.2010, 18:23
| Ответить | Цитировать | Написать  
25 сообщений из 27, страница 1 из 2
  1  все
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Enabled & Focus
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
NoSQL.ru             Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=45&msg=36811370&tid=1630682]:
 0ms
get settings:
 10ms
get forum list:
 13ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 43ms
get topic data:
 11ms
get forum data:
 3ms
get page messages:
 59ms
get tp. blocked users:
 2ms
others: 258ms
total:  407ms
созд. / загр.: 407ms
x
x
Закрыть


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