Txbrowse

[colthop]

Hola a todos:

Quisiera saber si se puede incluir un BMP en un txbrowse y si es posible un pequeño ejemplo.

Un saludo

Carlos

[rolando]

Carlos,

Code: Select all

oCol            := oBrw:AddCol()
oCol:cHeader        := "FECHA"
oCol:bStrData       := { || oDbf:FECHA}
oCol:nHeadStrAlign  := AL_CENTER
oCol:nDataStrAlign  := AL_LEFT
oCol:nWidth         := 99
oBrw:aCols[ 1 ]:AddResource( "CALENDARIO" )
oBrw:aCols[ 1 ]:nBtnBmp := 1
oBrw:aCols[ 1 ]:nEditType := EDIT_GET_BUTTON        
oBrw:aCols[ 1 ]:bEditBlock := {|| ElijoFecha(oBrw , oDlg , oDbf , oRichAgDiaria ) }

Si quieres usar el bitmap desde archivo, en lugar de:

Code: Select all

oBrw:aCols[ 1 ]:AddResource( "CALENDARIO" )

Usas así:

Code: Select all

oBrw:aCols[ 1 ]:AddBmpFile( "CALENDARIO.BMP" )

Saludos.

Rolando