Добро пожаловать в форум, Guest  >>   Войти | Регистрация | Поиск | Правила | В избранное | Подписаться
Все форумы / Microsoft Access Новый топик    Ответить
 подчиненная форма  [new]
Smile
Member

Откуда:
Сообщений: 1141
97
Есть форма, на ней подчиненная форма, в которой есть таблица. Как из главной формы можно перемещать указатель на текущую запись в таблице подчиненной формы (в смысле, черный треугольник).
20 окт 02, 03:10    [66514]     Ответить | Цитировать Сообщить модератору
 Re: подчиненная форма  [new]
ALK
Guest
не помню точно есть ли это в 97, но в 2000 это делают через BOOKMARK

под рукой аксесса проверить нет - на память так:

mainform_name.subform_control_name.FORM.bookmark = integer_value
21 окт 02, 12:25    [66707]     Ответить | Цитировать Сообщить модератору
 Re: подчиненная форма  [new]
Smile
Member

Откуда:
Сообщений: 1141
нет, допустим мне надо найти запись с id=234 в подчиненной форме, и переместить на нее указатель
причем здесь букмарк?
22 окт 02, 00:37    [67096]     Ответить | Цитировать Сообщить модератору
 Re: подчиненная форма  [new]
mahoune
Member

Откуда: Moscow
Сообщений: 5663
А тебе в любом случае надо будет, я думаю, встать на первую запись и по одной просматривать, отвечают условию или нет!
Еще один вариант... Если номер это у тябя числовой уникальный идентификатор, то можно попробовать этот номер присвоить объекту содержащему вложенную форму!
22 окт 02, 09:01    [67136]     Ответить | Цитировать Сообщить модератору
 Re: подчиненная форма  [new]
BAlex
Member

Откуда: Львов (Украина)
Сообщений: 119
Из хелпа для А97:
(Пример для обычной, а не подчиненной формы. Надеюсь, подход удастся реализовать для подчиненной формы. Сам такое не пробовал)

В следующем примере свойство RecordsetClone и объект Recordset используются для синхронизации записи в наборе записей с текущей записью формы. После выбора названия организации в раскрывающемся списке метод FindFirst вызывается для поиска записи, относящейся к этой организации, после чего значение свойства Bookmark объекта Recordset присваивается свойству Bookmark формы. В результате, в форме выводится найденная запись.

Sub КодПоставщика_AfterUpdate()

Dim rst As Recordset
Dim strSearchName As String

Set rst = Me.RecordsetClone
strSearchName = Str(Me!КодПоставщика)
rst.FindFirst "КодПоставщика = " & strSearchName
If rst.NoMatch Then
MsgBox "Записи не найдены"
Else
Me.Bookmark = rst.Bookmark
End If
rst.Close
End Sub
22 окт 02, 11:52    [67254]     Ответить | Цитировать Сообщить модератору
 Re: подчиненная форма  [new]
Smile
Member

Откуда:
Сообщений: 1141
да-да
именно так я и сделал сегодня
плохая првычка лезть в хелп в самый последний момент
надо отучаться=)
сэнкс
22 окт 02, 23:41    [67692]     Ответить | Цитировать Сообщить модератору
Все форумы / Microsoft Access Ответить