На форме лежит grid, где есть три видимых столбца. После двойного щелчка мышкой должна запуститься одна из трёх форм, в зависимости от столбца.Код:'Открытие карточки по имени столбцаSub F_OpenCart(oEvent as Object)Dim oForm as Object, oParent as Object, oParent1 as Object, oColumn as Object, oRow as ObjectoForm=oEvent.Source.Model'Есть различия?oParent=oEvent.Source.Model.Par entoParent1=oEvent.Source.getModel().get Parent()Dim oMeta as ObjectoMeta = oParent.getMetaData()oColumn=oForm.RowSe t.getColumns()End IfEnd Sub
|