FiveTech Software tech support forums

Horacio,

Lo idóneo es que uses un control TBitmap. Si lo estás mostrando sobre una ventana puedes hacer:

@ <nFila>, <nColumna> BITMAP oBmp OF oWnd RESOURCE "cerrar" ;
ON CLICK MsgInfo( "Mi acción" )

Para un diálogo definido desde recursos:

REDEFINE BITMAP oBmp ID <nId> OF oDlg RESOURCE "cerrar ...

... la de la derecha se mantendra siempre visible, al estylo panel fijo de excel, eso lo haces con freeze de la columna, saludos...

oBrw:nFreeze = nColumna

Hola buenos dias, gracias a ambos por la sugerencia y por el pequeño ejemplo que puso CMSOFT, imaginaba que la clase TXBrowse, tenia estilo de ...

... la de la derecha se mantendra siempre visible, al estylo panel fijo de excel, eso lo haces con freeze de la columna, saludos...

oBrw:nFreeze = nColumna

Hola buenos dias, gracias a ambos por la sugerencia y por el pequeño ejemplo que puso CMSOFT, imaginaba que la clase TXBrowse, tenia estilo de ...

... la de la derecha se mantendra siempre visible, al estylo panel fijo de excel, eso lo haces con freeze de la columna, saludos...

oBrw:nFreeze = nColumna

Hola buenos dias, gracias a ambos por la sugerencia y por el pequeño ejemplo que puso CMSOFT, imaginaba que la clase TXBrowse, tenia estilo de ...

y para jugar mas podrias dejar fija la columna de la derecha, asi aunque coloques varias columnas a la izquierda, la de la derecha se mantendra siempre visible, al estylo panel fijo de excel, eso lo haces con freeze de la columna, saludos...

oBrw:nFreeze = nColumna

Preguntar si oBrw:aCols[nColumna]:bEditValue == NIL.

Hola.
Estoy exportando a Excel el contenido de un xBrowse y para tomar el valor del campo utilizo lo siguiente:
xValor := eval(oBrw:aCols[nColumna]:bEditValue)
...pero me aborta cuando la columna en cuestión contiene un bitmap.
Pregunto, ¿cómo puedo saber si una de los elementos de oBrw:aCols es un ...

El diálogo desaparecia con la línea WITH OBJECT oBrw:nColumna para totalizar, pero lo he solucionado quitando este modo de totalizar y reemplazando por FOOTER en la columna con el total.
Un saludo,
Fernando Morales

... se encuentra definida al inicio de tu rutina.
Verifica este trozo, aparentemente aquí se encuentra tu error..
...
if nLinea>29.and.(nro_bon=cFolio).and.!eof()
Endpage
Page
nFila:=fil <--- Fil viene con valor y lo entrega a nFila
nPosicion:=6
nColumna:=col
nLinea:=0
endif
...
Saludos

Armando

... Bold Italic


Define Pen oPen Style 0 width 5
nVertical := oPrint:nVertRes()
nHorizontal := oPrint:nHorzRes()
nFila := Round(nVertical/60,0)
nColumna := Round(nHorizontal/80,0)
Fil=nFila
col=nColumna
Page
oPrint:Say(nFila*6,nColumna*40," Santiago, "+spac(8)+subs(a->fec_inf,1,2)+spac(11 ...

... Bold Italic


Define Pen oPen Style 0 width 5
nVertical := oPrint:nVertRes()
nHorizontal := oPrint:nHorzRes()
nFila := Round(nVertical/60,0)
nColumna := Round(nHorizontal/80,0)
Fil=nFila
col=nColumna
Page
oPrint:Say(nFila*6,nColumna*40," Santiago, "+spac(8)+subs(a->fec_inf,1,2)+spac(11 ...

Excelete. jeje

surGom wrote:Gracias GoosFancito, así lo resolvi:
oLbx:bBkColor:= {|nRow,nCol,nStyle| If( nStyle==0 .and. nCol==nColumna,RGB(223,227,247), ) }

Luis

Gracias GoosFancito, así lo resolvi:
oLbx:bBkColor:= {|nRow,nCol,nStyle| If( nStyle==0 .and. nCol==nColumna,RGB(223,227,247), ) }

Luis

... cTexto, lChkBox, nCopias)
local oFnt1, oFnt2, oFnt3, oFnt4, oFnt5
local nlinea:=75, nAncho:=2600
local nSeparacion:=19, nSaltoLinea:=60
local nColumna:=1000
local nCentro:=1400
local Imagen1:="logos\Aguila.bmp"
local Imagen2:="logos\MEscudo.bmp"
local Imagen3:="logos\Admo04.bmp"
local oPrn ...

... sobre la que se da el click ? Hola Armando:

Creo que podrías usar el codeblock bLClickHeader que al evaluarse te daría la columna donde se clickeó:

oBrw:bLClickHeader := {|nmRow, nmCol| nColumna := oBrw:MouseColPos( nmCol ) }

Espero que funcione (soy novato en xBrwowse).

Manuel Mercado