| |
|
|
| | В форме есть кнопка, которая должна быть активна если фильтр применён, вроде очевидно, что должно быть Кнопка.Enabled = Me.FilterOn , но куда это вставить? событие формы OnApplyFilter происходит до применения фильтра. Не на таймер же это вешать?
Такая процедура почему то не работает:
Private Sub Form_ApplyFilter(Cancel As Integer, ApplyType As Integer)
If Not IsNull(Me.Filter) Then
If ApplyType = acApplyFilter Then
Кнопка.Enabled = True
ElseIf ApplyType = acShowAllRecords Then
Кнопка.Enabled = False
End If
End If
End Sub
ApplyType постоянно возвращает "1"
Access2000 | |
| |
| |
| |
 14 Кб. |
|
| | Странно. Проверьте вот это?
при снятии фильтра кнопка становится неактивной | |
| |
| |
| |
|
|
| | Действительно странно, ваш вариант работает.
Я всё таки добился результата, путём создания новой формы и копирования в неё всех элементов и кода, заработало. В чём было дело так и не понял...
Кстати ещё момент: после очистки фильтра и его применения (пустого), кнопка не блокируется, хотя иконка фильтра не активна, но с этим попробую разобраться сам.
Спасибо за помощь. | |
| |
| |
| |
|
|
| | Собака порылась в сортировке: если у формы стоит сортировка по умолчанию, то AppyType возвращает "1".
Если убрать сортировку по умолчанию, но применить сортировку при включённом фильтре, то при отключении фильтра AppyType снове возвращает "1".
Есть у кого нибудь идеи, как это обойти? | |
| |
| |
