Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Получение списка выделенных записей / 3 сообщений из 3, страница 1 из 1
06.07.2004, 20:06:00
    #32592280
AlexSV
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Получение списка выделенных записей
Имеется форма, в ней подчиненная. В родительской задаются критерии отбора записей в подчиненной.
Так вот, как потом получить список выделенных записей из подчиненной формы в табличном виде?
Похожие темы уже обсуждались, проблема заключается в том, что когда
после выделения записей в подчиненной форме, я хочу распечатать их (нажимаю "Печать" в родительской), но свойство SelHeight возвращает 0. Я так полагаю потому что теряется фокус/выделение с подчиненной формы.
Можно как-то побороть?
...
Рейтинг: 0 / 0
06.07.2004, 20:07:52
    #32592283
Владимир Саныч
Модератор форума
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Получение списка выделенных записей
Можно перенести кнопку на тулбар.
...
Рейтинг: 0 / 0
07.07.2004, 08:26:01
    #32592519
AlexSV
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Получение списка выделенных записей
Для тех кто все же не хочет в тулбар ;)
В подчиненной форме создаем два скрытых поля для первой записи и для их количества. Далее на событие Exit, объекта подчиненная форма, вешаем примерно селдующее:

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
Private Sub F_SubForm_Exit(Cancel As Integer)
 '
 
On Error GoTo ErrorHandler
 '
 
Forms!F_ParentForm!F_SubForm!RowsCount = Forms!F_ParentForm!F_SubForm.Form.SelHeight
Forms!F_ParentForm!F_SubForm!TopRow = Forms!F_ParentForm!F_SubForm.Form.SelTop
 '
 
Exit Sub
 '
 
ErrorHandler:
    MsgBox "Error ..."
    Exit Sub
 '
 
End Sub

ну и в итоге по нажатию "Печать" обращаемся к скрытым полям, которые содержат нужные данные ;)
...
Рейтинг: 0 / 0
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Получение списка выделенных записей / 3 сообщений из 3, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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