topic-16232

Posts: 505

Joined: Sat Apr 22, 2006 09:09 AM

Txbrowse
Posted: Tue Jul 28, 2009 09:58 AM

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

Colt Hop ED, S.L.
Carlos Blas Fernández Domínguez
Tlfo: 645847093
E-Mail: carlos@colthop.es

Nunca se termina de aprender, por eso necesito siempre ayuda.

rolando

Posts: 593

Joined: Sat May 12, 2007 11:47 AM

Re: Txbrowse
Posted: Tue Jul 28, 2009 11:32 AM

Carlos,

Code (fw): Select all Collapse

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 (fw): Select all Collapse

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

Usas así:

Code (fw): Select all Collapse

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

Saludos.

Rolando

FiveTech Support Forums

Continue the discussion