Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Show Modal / 14 сообщений из 14, страница 1 из 1
24.09.2003, 15:34
    #32274340
Lazy Cat
Lazy Cat
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Show Modal
Как сделать чтобы форма отображалась модально - т.е. чтобы нельзя было переключится с нее.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
24.09.2003, 15:36
    #32274342
Лох Позорный
Лох Позорный
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Show Modal
В конструкторе св-во формы "Модальное окно" = "Да"
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
24.09.2003, 15:36
    #32274345
sasha_1
sasha_1
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Show Modal
свойства формы - другие - модальная - Да.
либо в коде modal=true
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
24.09.2003, 15:39
    #32274351
sasha_1
sasha_1
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Show Modal
2 ЛП:
быстро печатаешь :)
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
24.09.2003, 15:52
    #32274372
Alexus12
Alexus12
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Show Modal
бывает (!!!) что такая радость сбоит
а вот
docmd.openform имяформы, <нужное колво запятых>, acDialog
вроде работает всегда
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
24.09.2003, 15:53
    #32274376
Лифчик
Лифчик
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Show Modal
2 Sasha_1: Да у Лоха ответы на все вопросы уже заготовлены. Он их копи-пейстом. Или на волокне ближе к серверу расположен. Кстати, а где sql находится?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
24.09.2003, 16:00
    #32274388
SergeySV
SergeySV
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Show Modal
У тов. Гетца написано, стр. 403:
Если свойствам формы Modal и Pop-up присвоено значение Yes, этого еще не достаточно, чтобы приостановить выполнение кода приложения после вызова формы. Нужно открыть форму методом DoCmd.Open, передав ему константу acDialog.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
24.09.2003, 16:02
    #32274392
Alexus12
Alexus12
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Show Modal
О! Золотые слова про acDialog!
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
24.09.2003, 16:14
    #32274421
SergeySV
SergeySV
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Show Modal
Сам вчера с этим модальным окном кочевряжился, надо было ему вид при открытии переделать.....

Хорошо тов. Гетц про это написал (кучу нервов себе сразу сэкономил):
Настоящий пример демонстрирует огромную разницу между формами Access и формами VB и VBA. В VB и VBA всегда можно загрузить форму, настроить ее свойства и после этого вывести ее в модальном режиме (приостановив выполнение кода в вызвающ. модуле). В Access так сделать невозмжно...т .д. - и дальше описывается вариант с циклом DoEvents и Set frm=New Form_Мояформа
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
24.09.2003, 16:24
    #32274437
Лох Позорный
Лох Позорный
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Show Modal
Да неужели? А я блин так делаю и даже не знаю, что оно не работает
Открывай форму невидимой и модальной, настраивай все что хочешь и делай ее видимой. Вот и все.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
24.09.2003, 16:45
    #32274472
SergeySV
SergeySV
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Show Modal
Ты скорей всего делаешь так:
Код: plaintext
1.
2.
3.
4.
DoCmd.OpenForm nnn, , , , , acHidden
Forms( "nnn" )( "Text1" ).Caption =  "ля-ля" 
Forms( "nnn" ).Visible = True
... код далее

она конечно открывается и выглядит как модальное окно (фокус получает, с него никуда не уйдешь), токо после Forms("nnn").Visible = True твой кода дальше пойдет выполняться, а при показе настоящих модальных форм выполнение кода останавливается до закрытия окна.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
24.09.2003, 16:53
    #32274483
Лох Позорный
Лох Позорный
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Show Modal
Ээээ
Да. Позор на мою седую голову. Рву волосы (в том числе и на голове).
Действительно, таким образом у меня только немодальные формы настраиваются. Модальные сами всю нужную им информацию откуда нибудь вытягивают при открытии.
Был неправ, вел себя недостойно чести советского офицера.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
24.09.2003, 18:11
    #32274610
Hummer
Hummer
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Show Modal
Вот так можно сделать, чтобы открывать в Hidden изменять и чтобы была модальной.

Код: plaintext
1.
2.
Do While Loaded_frm( "имя формы" )
    DoEvents
Loop


Функция вернёт True если форма открыта в режиме формы или таблицы.
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
Function Loaded_frm(strFName As String) As Boolean
   Const conObjStateClosed =  0 
   Const conDesignView =  0 
   If SysCmd(acSysCmdGetObjectState, acForm, strFName) <> conObjStateClosed Then
       If Forms(strFName ).CurrentView <> conDesignView Then
           Loaded_frm= True
       End If
   End If
End Function
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
24.09.2003, 23:30
    #32274760
Senin Viktor
Senin Viktor
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Show Modal
Привет, извращенцам с циклами
А потом в форуме вопросы появляються - "А че это у меня проц на 100% всегда как Акес открою?" Наверное такие же прогеры Акес писали - с циклами :)

Лучше передавать параметры через паблик-переменные (коллекцию - если много) //это я про acDialog
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Show Modal / 14 сообщений из 14, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 446ms
Закрыть
start [/forum/topic.php?fid=45&tablet=1&tid=1679262]:
 0ms
get settings:
 7ms
get forum list:
 10ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 159ms
get topic data:
 6ms
get forum data:
 2ms
get page messages:
 27ms
get tp. blocked users:
 1ms
others: 228ms
total:  446ms
x
x
Закрыть


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