FiveTech Software tech support forums

... olbx101c:aCols[4]:addbmpfile("\QASVE\config\bmp\BUSCAR16X16.bmp") oLbx101c:aCols[4]:lBtnTransparent := .t. olbx101c:aCols[4]:nBtnBmp := 1 olbx101c:aCols[4]:nDataBmpAlign := AL_CENTER //olbx101c:acols[4]:bEditWhen:= { || olbx101c:aArrayData[olbx101c:nArrayAt][5]="T" ...

oCol:nBtnBmp := <imagefile/resourcename>

to inser on a column a calenda I made WITH OBJECT oBrowse:aCols[ 7] :AddBitmap( "INVOICE_CALENDARIO") :nBtnBmp := 1 :lBtnTransparent := .t. * :lBmpStretch := .f. :nwidth := 120 :nDataStrAlign := AL_CENTER :nHeadStrAlign := AL_CENTER :nDataStrAlign := oBrowse:aCols[ 7]:DefStyle(AL_LEFT,.f.) ...

... ), nXBrColor } } // a defined button :aCols[ 6 ]:addbmpfile( c_Path1 + "Plus.png" ) :aCols[ 6 ]:lBtnTransparent := .t. :aCols[ 6 ]:nBtnBmp := 1 :aCols[ 6 ]:nEditType := EDIT_BUTTON :aCols[ 6 ]:bEditBlock := { | nRow, nCol, oCol, nKey | ; MsgAlert( "Row : = " + ALLTRIM( ...

... se me cuelga comento ese configuracion de la columna y termina normal. /* WITH OBJECT aBrw:aCols[ 1 ] :addbmpfile( op:bmp16+"eye.bmp" ) :nBtnBmp := 1 :nEditType := EDIT_BUTTON :bEditBlock := {|| VerItems( cCodigo,cQry:tipo,cQry:ord_comp )} :lBtnTransparent := .t. :lBmpStretch := .t. END ...

Sorry my mistake
:nBtnBmp := 1

How I can insert a button/btnbmp on the header of this column ? with action ?

WITH OBJECT oBrw:aCols[ 5] :AddBmpFile(".\bitmaps\sh_plus.bmp") :nBtnBmp := 1 :nwidth := 60 :nDataStrAlign := AL_CENTER :nHeadStrAlign := AL_CENTER :nEditType := EDIT_BUTTON :bEditBlock := { ||RES->QUANTITY++ } :lBtnTransparent := .t. :bEditWhen ...

... eu insiro bitmaps mas como eu posso chamar tdatepick classe? selecionar uma data? //calend oBrowse:aCols[2]:AddResource('CALEND') oBrowse:aCols[2]:nBtnBmp := 1 oBrowse:aCols[2]:lBmpStretch := .f. oBrowse:aCols[2]:lBmpTransparent := .t. oBrowse:aCols[2]:nDataBmpAlign := AL_CENTER oBrowse:aCols[2]:nHeadStrAlign ...

... oBrwcp:aCols[12]:cEditPicture := '@E 99,999.99' //calend oBrowse:aCols[2]:AddResource('CALEND') oBrowse:aCols[2]:nBtnBmp := 1 oBrowse:aCols[2]:lBmpStretch := .f. oBrowse:aCols[2]:lBmpTransparent := .t. oBrowse:aCols[2]:nDataBmpAlign := AL_CENTER oBrowse:aCols[2]:nHeadStrAlign ...

Thanks. Mr. Rao

Thanks.

For now, we have the workaround of setting oBrw:lGDIP := .f.

This issue is completely fixed in 18.03

...       :nEditType     := EDIT_BUTTON      :AddResource( "OPEN" )      :nBtnBmp       := 1      :bEditBlock    := { || MsgInfo( "ok" ) }   END  ...

Do you mind taking some more trouble?
Please save both the sources as xbrbtn2.prg and xbrbtn2.rc in \fwh\samples folder
Go to \fwh\samples folder and execute "buildh xbrbtn2"

It hangs up when leaving http://i68.tinypic.com/1zgg747.jpg --------------------Configuración: ACR - Release--------------------Turbo Incremental Link 6.80 Copyright (c) 1997-2017 Embarcadero Technologies, Inc.Unrecoverable error 6005: Exception error:    Exception ...

...     :nEditType     := EDIT_BUTTON      :AddResource( "OPEN" )      :nBtnBmp       := 1      :bEditBlock    := { || MsgInfo( "ok" ) }   END  ...