|
|
|
Нужно блокировать ввод данных в подчиненную форму
|
|||
|---|---|---|---|
|
#18+
Добрый вечер, Дорогие Аксэсовцы! Есть форма, в ней подчиненная форма. Нужно блокировать ввод данных в подчиненную форму пока не введут данные в поля основной формы. Тут как нужно, написать обработчик события "Получение фокуса" подчиненной формы с проверкой на присутствие введенных данных в основной форме? Или есть вариант попроще? Что скажете? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 01.06.2004, 17:42 |
|
||
|
Нужно блокировать ввод данных в подчиненную форму
|
|||
|---|---|---|---|
|
#18+
Тут как нужно, написать обработчик события "Получение фокуса" подчиненной формы с проверкой на присутствие введенных данных в основной форме? Тут как нужно, написать обработчик события "ДоВставки" подчиненной формы с проверкой на наличие ошибки при сохранении записи (Me.Dirty=False) в главной форме, не забыв про ситуацию Me.NewRecord=True ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 01.06.2004, 17:49 |
|
||
|
Нужно блокировать ввод данных в подчиненную форму
|
|||
|---|---|---|---|
|
#18+
А по подробнее можно? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 01.06.2004, 17:53 |
|
||
|
Нужно блокировать ввод данных в подчиненную форму
|
|||
|---|---|---|---|
|
#18+
??? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 02.06.2004, 12:29 |
|
||
|
Нужно блокировать ввод данных в подчиненную форму
|
|||
|---|---|---|---|
|
#18+
А много полей в основной форме должно быть заполнено для получения разрешения на ввод в подчиненную? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 02.06.2004, 12:49 |
|
||
|
Нужно блокировать ввод данных в подчиненную форму
|
|||
|---|---|---|---|
|
#18+
Всего 3 поля ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 02.06.2004, 13:22 |
|
||
|
Нужно блокировать ввод данных в подчиненную форму
|
|||
|---|---|---|---|
|
#18+
Не знаю, насколько это простейший вариант, но я бы сделал так: Private sub FldTst () If not isnull(me.Поле1) and not isnull(me.поле2) and not isnull(me.поле3) then Me.ПодчиненнаяФорма.Form.AllowEdits = true Me.ПодчиненнаяФорма.Form.AllowAdditions = true Else Me.ПодчиненнаяФорма.Form.AllowEdits = False Me.ПодчиненнаяФорма.Form.AllowAdditions = False End if End Sub И вызывал бы его на текущую запись основной формы и обновление каждого из трех полей ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 02.06.2004, 13:41 |
|
||
|
|

start [/forum/topic.php?fid=45&gotonew=1&tid=1674178]: |
0ms |
get settings: |
9ms |
get forum list: |
15ms |
check forum access: |
4ms |
check topic access: |
4ms |
track hit: |
72ms |
get topic data: |
10ms |
get first new msg: |
6ms |
get forum data: |
3ms |
get page messages: |
60ms |
get tp. blocked users: |
1ms |
| others: | 245ms |
| total: | 429ms |

| 0 / 0 |
