Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Фокус (я прячу контрол формы, как перед этим с него забрать курсор?) / 25 сообщений из 46, страница 1 из 2
  1  все
19.11.2004, 11:25:35
    #32790816
tuzz
tuzz
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Фокус (я прячу контрол формы, как перед этим с него забрать курсор?)
Поскажите, плиз, я прячу контрол формы, как перед этим с него забрать курсор? Заранее спаибо!
tuzz
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
19.11.2004, 11:37:41
    #32790847
Daf
Daf
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Фокус (я прячу контрол формы, как перед этим с него забрать курсор?)
expression.SetFocus...
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
19.11.2004, 11:39:23
    #32790856
Daf
Daf
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Фокус (я прячу контрол формы, как перед этим с него забрать курсор?)
Правила форума и еще F1.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
19.11.2004, 11:44:49
    #32790866
Владимир Саныч
Владимир СанычПривилегированный пользователь
Модератор форума
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Фокус (я прячу контрол формы, как перед этим с него забрать курсор?)
http://www.sql.ru/faq/faq_topic.aspx?fid=213
вопрос 30.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
19.11.2004, 13:27:51
    #32791253
tuzz
tuzz
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Фокус (я прячу контрол формы, как перед этим с него забрать курсор?)
Все это понятно!
Делаю expression.SetFocus
И Access тупо слетает!! Есть другой способ?
tuzz
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
19.11.2004, 13:30:13
    #32791265
Bor-L
Bor-L
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Фокус (я прячу контрол формы, как перед этим с него забрать курсор?)
А на потерю фокуса контролом Вы ничего не делаете ?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
19.11.2004, 13:35:38
    #32791285
tuzz
tuzz
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Фокус (я прячу контрол формы, как перед этим с него забрать курсор?)
Bor-LА на потерю фокуса контролом Вы ничего не делаете ?

Private Sub r1_LostFocus()

cbtCalc.SetFocus

Forms.Quote.Order.Form.DESC1.Visible = True
Forms.Quote.Order.Form.NameUA2.Visible = False
End Sub
Вот и все!
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
19.11.2004, 15:40:07
    #32791751
tuzz
tuzz
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Фокус (я прячу контрол формы, как перед этим с него забрать курсор?)
На других машинах тоже самое!
tuzz
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
19.11.2004, 18:00:43
    #32792154
Bor-L
Bor-L
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Фокус (я прячу контрол формы, как перед этим с него забрать курсор?)
Private Sub r1_LostFocus()

Forms.Quote.Order.Form.DESC1.Visible = True
cbtCalc.SetFocus

Forms.Quote.Order.Form.NameUA2.Visible = False
End Sub

А так ?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
22.11.2004, 10:31:04
    #32793422
tuzz
tuzz
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Фокус (я прячу контрол формы, как перед этим с него забрать курсор?)
Bor-LPrivate Sub r1_LostFocus()

Forms.Quote.Order.Form.DESC1.Visible = True
cbtCalc.SetFocus

Forms.Quote.Order.Form.NameUA2.Visible = False
End Sub

А так ?

тоже самое!
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
22.11.2004, 11:10:32
    #32793507
Витал
Витал
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Фокус (я прячу контрол формы, как перед этим с него забрать курсор?)
А м.б.
Forms("Quote") .Order.Form.DESC1.Visible (?)
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
22.11.2004, 11:19:06
    #32793528
фокус
фокус
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Фокус (я прячу контрол формы, как перед этим с него забрать курсор?)
В подчиненке тоже (отдельно) нужно управлять фокусом
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
Private Sub r1_LostFocus()
    cbtCALC.SetFocus

    Forms.Quote.Order.Form.DESC1.Visible = True
    Forms.Quote.Order.Form.DESC1.SetFocus      'на случай фокуса в NameUA2
    Forms.Quote.Order.Form.NameUA2.Visible = False

End Sub
по крайней мере у меня в случае фокуса в подчиненке в NameUA2 (вернее, если он там был перед переходом в главную) Аксесс ругается на невозможность скрыть контрол, имеющий фокус (но не слетает). Хотя фокус по завершении процедуры оказывается в cbtCALC в главной форме, а до начала её был в r1 главной (видимо при обращении процедуры к подчненке восстанавливается фокус в том её контроле, в котором он был до выхода из подформы).
Акс 97.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
22.11.2004, 11:23:46
    #32793544
tuzz
tuzz
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Фокус (я прячу контрол формы, как перед этим с него забрать курсор?)
ВиталА м.б.
Forms("Quote") .Order.Form.DESC1.Visible (?)
Аналогично, блин! Давно уже так access не слитал!
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
22.11.2004, 11:33:42
    #32793573
фокус
фокус
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Фокус (я прячу контрол формы, как перед этим с него забрать курсор?)
tuzz Витал Forms("Quote") .Order.Form.DESC1.Visible (?)
Аналогично, блин! Давно уже так access не слитал!

Обычно при отсутствии данных в подчиненке обращение к ней в предлагаемой форме вызывает ошибку. как-то кажется видел даже "слёты". (подчиненок правда было много).
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
22.11.2004, 11:37:59
    #32793585
фикус
фикус
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Фокус (я прячу контрол формы, как перед этим с него забрать курсор?)
фокус tuzz Витал Forms("Quote") .Order.Form.DESC1.Visible (?)
Аналогично, блин! Давно уже так access не слитал!

Обычно при отсутствии данных в подчиненке обращение к ней в предлагаемой форме вызывает ошибку. как-то кажется видел даже "слёты". (подчиненок правда было много).
забыл AllowAdditions - т.е. если, каацца, подчиненная форма открыта в режиме "без добавления" - AllowAdditions = False
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
22.11.2004, 11:48:40
    #32793613
tuzz
tuzz
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Фокус (я прячу контрол формы, как перед этим с него забрать курсор?)
фокусВ подчиненке тоже (отдельно) нужно управлять фокусом
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
Private Sub r1_LostFocus()
    cbtCALC.SetFocus

    Forms.Quote.Order.Form.DESC1.Visible = True
    Forms.Quote.Order.Form.DESC1.SetFocus      'на случай фокуса в NameUA2
    Forms.Quote.Order.Form.NameUA2.Visible = False

End Sub
по крайней мере у меня в случае фокуса в подчиненке в NameUA2 (вернее, если он там был перед переходом в главную) Аксесс ругается на невозможность скрыть контрол, имеющий фокус (но не слетает). Хотя фокус по завершении процедуры оказывается в cbtCALC в главной форме, а до начала её был в r1 главной (видимо при обращении процедуры к подчненке восстанавливается фокус в том её контроле, в котором он был до выхода из подформы).
Акс 97.
тоже самое..
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
22.11.2004, 12:13:55
    #32793684
фигус
фигус
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Фокус (я прячу контрол формы, как перед этим с него забрать курсор?)
Таки подформы у вас ЭллауЭддишн, или нон фиха ?
От этого может зависеть ашшиппка обращения к подформе при отсутствии в ей данных.

И сделай те декомпиле адын разок для начала.



ЗЫ: Проблема со слетом может упираться еще в синхронизацию подформ, связанных не с главной, а с другими поформами. (т.е. если "основные" поля связи указывают на поля других поформ или поля главной, источником данных которых являются поля других ее (не эллау эдддишн) подформ -т.е. поля с сурсами типа "= Forms!Main!sub1.Form.AnyField" При отсутствии записей в подчиненной sub1 такие ссылки в полях связи могут вызывать слёты. Но эти слёты записе-зависимы. Т.е. случаются при некотором, вполне конкретном состоянии данных. Что и указывает на них).
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
22.11.2004, 13:53:21
    #32794027
Витал
Витал
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Фокус (я прячу контрол формы, как перед этим с него забрать курсор?)
авторcbtCALC.SetFocus

Forms.Quote.Order.Form.DESC1.Visible = True
Forms.Quote.Order.Form.DESC1.SetFocus

Могут быть грабли и по такой причине "cbtCALC.SetFocus" - если этот контрол в главной форме и нормально получает фокус, то для того, чтобы передать фокус в подчиненую, надо сначала передать ей фокус, как контролу главной,
и только потом непосредственно контролу.

Forms.Quote.Order.SetFocus
Forms.Quote.Order.Form.DESC1.SetFocus

если, конечно, не вру нагло.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
22.11.2004, 14:23:23
    #32794117
tuzz
tuzz
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Фокус (я прячу контрол формы, как перед этим с него забрать курсор?)
Витал авторcbtCALC.SetFocus

Forms.Quote.Order.Form.DESC1.Visible = True
Forms.Quote.Order.Form.DESC1.SetFocus

Могут быть грабли и по такой причине "cbtCALC.SetFocus" - если этот контрол в главной форме и нормально получает фокус, то для того, чтобы передать фокус в подчиненую, надо сначала передать ей фокус, как контролу главной,
и только потом непосредственно контролу.

Forms.Quote.Order.SetFocus
Forms.Quote.Order.Form.DESC1.SetFocus

если, конечно, не вру нагло.

Не помогает это все...
Может есть другой способ прятать контролы...?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
22.11.2004, 14:31:11
    #32794144
Витал
Витал
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Фокус (я прячу контрол формы, как перед этим с него забрать курсор?)
Субформа, я так понимаю ленточная?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
22.11.2004, 14:55:14
    #32794229
tuzz
tuzz
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Фокус (я прячу контрол формы, как перед этим с него забрать курсор?)
ВиталСубформа, я так понимаю ленточная?
да, надо прятать по очередно два поля..
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
22.11.2004, 16:47:35
    #32794596
Rivkin Dmitry
Rivkin Dmitry
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Фокус (я прячу контрол формы, как перед этим с него забрать курсор?)
Что-то странное! Все рассуждения, приведенные здесь, правильны для Enabled контрола, а с Visible обычно проблем не бывает. Возможно, субформа в показывается фомате таблицы (Datasheet)? Тогда проблемы возможны. И тогда прятать надо не контролы а поля - ColumnWidth = 0 or ColumnHidden = True
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
22.11.2004, 16:48:06
    #32794597
Витал
Витал
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Фокус (я прячу контрол формы, как перед этим с него забрать курсор?)
авторPrivate Sub r1_LostFocus()
cbtCALC.SetFocus

Forms.Quote.Order.Form.DESC1.Visible = True
Forms.Quote.Order.Form.DESC1.SetFocus 'на случай фокуса в NameUA2
Forms.Quote.Order.Form.NameUA2.Visible = False

End Sub
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
Private Sub r1_LostFocus()
     With Forms("Quote").Order
       .SetFocus
       .Form.DESC1.Visible = True
       .Form.DESC1.SetFocus      'на случай фокуса в NameUA2
       .Form.NameUA2.Visible = False
    End With
End Sub

И такое не работает?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
22.11.2004, 18:57:20
    #32794878
tuzz
tuzz
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Фокус (я прячу контрол формы, как перед этим с него забрать курсор?)
Витал авторPrivate Sub r1_LostFocus()
cbtCALC.SetFocus

Forms.Quote.Order.Form.DESC1.Visible = True
Forms.Quote.Order.Form.DESC1.SetFocus 'на случай фокуса в NameUA2
Forms.Quote.Order.Form.NameUA2.Visible = False

End Sub
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
Private Sub r1_LostFocus()
     With Forms("Quote").Order
       .SetFocus
       .Form.DESC1.Visible = True
       .Form.DESC1.SetFocus      'на случай фокуса в NameUA2
       .Form.NameUA2.Visible = False
    End With
End Sub

И такое не работает?
Блин! Я в шоке, все тоже самое.. на всех машинах, разные инсталяхи офиса!
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
22.11.2004, 19:23:26
    #32794908
Rivkin Dmitry
Rivkin Dmitry
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Фокус (я прячу контрол формы, как перед этим с него забрать курсор?)
16:47 - не верно?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
  1  все
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Фокус (я прячу контрол формы, как перед этим с него забрать курсор?) / 25 сообщений из 46, страница 1 из 2
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 388ms
Закрыть
start [/forum/topic.php?fid=45&mobile=1&tid=1670129]:
 0ms
get settings:
 9ms
get forum list:
 20ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 48ms
get topic data:
 11ms
get forum data:
 3ms
get page messages:
 85ms
get tp. blocked users:
 1ms
others: 203ms
total:  388ms
x
x
Закрыть


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