¿Objeto datagrid no es posible conecer la posicion de la tabla subyacente?

Hola Agustín, Te paso una función que retorna la primera fila seleccionada
del datagrid, debes pasarle el formulario donde se encuentra el datagrid y
el datagrid

<Description("Obtiene la primera fila seleccionada que encuentra en el
datagrid.")> _
Public Function RowSelect(ByVal Frm As Form, ByVal Grid As DataGrid) As
DataRow
If Not (Frm Is Nothing) Then
Dim cm As CurrencyManager CType(Frm.BindingContext(Grid.DataSource, Grid.DataMember), CurrencyManager)
If Not (cm Is Nothing) Then
Dim dv As DataView = CType(cm.List, DataView)
If Not (dv Is Nothing) Then
Dim f As Integer
For f = 0 To dv.Count - 1
If Grid.IsSelected(f) Then
Return (dv.Item(f).Row)
End If
Next
End If
End If
End If
Return Nothing
End Function

Una vez tengas el datarow seleccionado, puedes saber a que tabla pertenece
con:
Row.Table.TableName
y si se trata de la tabla secundaria puedes utilizar el metodo:
Dim Parenrow as DataRow= Row.GetParentRow("[Nombre de la relacion]")
para averiguar cual es el registro principal que lo contiene


Espero haber ayudado.

Un saludo Said H.

"Agustín Pérez" escribió en el mensaje
news:up#

Hola grupo, tengo un par de problemillas con el objeto datagrid. Este

objeto

lo estoy utilizando enlazado a un dataset que contiene dos tablas
relacionadas, y no consigo conocer la fila marca de la tabla subyacente

así

como los datos que contiene.
Por favor si alguien sabe algo le agradecería q me contestase.

Muchas gracias.
Un saludo

"Said H" escribió en el mensaje
news:#

Hola Agustín, Te paso una función que retorna la primera fila seleccionada
del datagrid, debes pasarle el formulario donde se encuentra el datagrid y
el datagrid

<Description("Obtiene la primera fila seleccionada que encuentra en el
datagrid.")> _
Public Function RowSelect(ByVal Frm As Form, ByVal Grid As DataGrid)

As

DataRow
If Not (Frm Is Nothing) Then
Dim cm As CurrencyManager > CType(Frm.BindingContext(Grid.DataSource, Grid.DataMember),

CurrencyManager)

If Not (cm Is Nothing) Then
Dim dv As DataView = CType(cm.List, DataView)
If Not (dv Is Nothing) Then
Dim f As Integer
For f = 0 To dv.Count - 1
If Grid.IsSelected(f) Then
Return (dv.Item(f).Row)
End If
Next
End If
End If
End If
Return Nothing
End Function

Una vez tengas el datarow seleccionado, puedes saber a que tabla pertenece
con:
Row.Table.TableName
y si se trata de la tabla secundaria puedes utilizar el metodo:
Dim Parenrow as DataRow= Row.GetParentRow("[Nombre de la relacion]")
para averiguar cual es el registro principal que lo contiene


Espero haber ayudado.

Un saludo Said H.

"Agustín Pérez" escribió en el mensaje
news:up#
> Hola grupo, tengo un par de problemillas con el objeto datagrid. Este
objeto
> lo estoy utilizando enlazado a un dataset que contiene dos tablas
> relacionadas, y no consigo conocer la fila marca de la tabla subyacente
así
> como los datos que contiene.
> Por favor si alguien sabe algo le agradecería q me contestase.
>