FiveTech Software tech support forums

Olá _, Obrigado pela sugestão mas não funcionou. O mais interessante é que se eu colocar um bitmap dentro da SETIMAGELIST tambem não funciona o efeito erasebakground :cry: Já na classe folder que mudei funcionou. Alguém tem mais alguma sugestão ? Olá Antonio, CLIPPER WNDLEFT( ...

Olá Antonio,

Tem como fazer o efeito erasebackground com bitmaps dentro da classe
Theader ?

Veja na imagem abaixo que a classe image (Setimagelist) funciona certo mas o bitmap não.



Gracias,

Rossine.

... oWnd) oImageList:Add( oBmp1, oBmp2 ) oTree = TTreeView():New( 3, 0, oWnd1) oTree:bChanged = { || eng050401( oTree:GetSelected()) } oTree:SetImageList( oImageList ) oItem = oTree:Add(itemid1) odb1:=oServer:Query("select bom2.itemidc itemidc,goods2.descrip descrip,unit.unit unit,substring(bom2.mem,1,25) ...

... ,nrgb(128,200,240), .T., .F., 300, 350, 'Proyectos' ) oTree:bLDblClick := { | nRow, nCol, nKeyFlags | oSelf:MyClick( nRow, nCol, oTree ) } oTree:SetImageList( oImageList ) While ++i <= Len( oSelf:aEmpresas ) oTree:Add( oSelf:aEmpresas[i] ) /// END SET MESSAGE OF oSelf:oWnd TO '' NOINSET CLOCK ...

... ACTIVATE DIALOG TestDlg CENTERED ; ON INIT FillTree( oTree, ImageList ) function FillTree( Tree, ImageList ) local Brance... WITH OBJECT Tree :SetImageList( ImageList) Brance1:= :Add( "THIS IS THE FIRST",0) Brance1:Add("This is an Item inside the 1st Brance",0) Brance2:= :Add( "THIS IS THE ...