xBrowse desde Dialogos y recursos

[wmormar]

Hola,

Alguien tendrá un ejemplo de xBrowse en recursos usando arreglos.

Saludos y gracias de antemano.

[wmormar]

desde dialogos se usa exactamente igual que con ventanas

Code: Select all  Expand view  RUN

Define Dialog oDlg

   oBrw := TXBrowse():New( oDlg )
   oBrw:SetArray( aDatos )
   oBrw:CreateFromCode()

Activate Dialog oDlg

desde recursos

Code: Select all  Expand view  RUN

Define Dialog oDlg Resource "MI_RECURSO"

   oBrw := TXBrowse():New( oDlg )
   oBrw:SetArray( aDatos )
   oBrw:CreateFromResource( 101 )

Activate Dialog oDlg

Espero te sirva

Salu2

_

Gracias por contestar.

Lo checo ahora mismo,

[wmormar]

desde dialogos se usa exactamente igual que con ventanas

Code: Select all  Expand view  RUN

Define Dialog oDlg

   oBrw := TXBrowse():New( oDlg )
   oBrw:SetArray( aDatos )
   oBrw:CreateFromCode()

Activate Dialog oDlg

desde recursos

Code: Select all  Expand view  RUN

Define Dialog oDlg Resource "MI_RECURSO"

   oBrw := TXBrowse():New( oDlg )
   oBrw:SetArray( aDatos )
   oBrw:CreateFromResource( 101 )

Activate Dialog oDlg

Espero te sirva

Salu2

_

Gracias _, lo chequé y funcionó, ahora tengo el siguiente problema.

Cuando tecleo y va localizando las lineas de acuerdo a lo que tecleo, se desaparecen los encabezados y donde se encuentra la flecha indicadora de la fila activa.

Hay alguna manera de solucionarlo.


Saludos y gracias de antemano

[wmormar]

Otra vez dando lata.

Como puedo saber el número de columna cuando le doy un click al header con el boton izquierdo o derecho.

Sigo con el xbrowse

Saludos y gracias de antemano

[wmormar]

Code: Select all  Expand view  RUN

oCol:bRClickHeader := { |nRow,nCol| Alert( oBrw:nColOffSet - 1 + oBrw:MouseColPos( nCol ) ) }

Espero te sirva

salu2

_

Mil gracias, funcione ok.