topic-28162

Posts: 22

Joined: Fri May 04, 2012 03:26 PM

TABS bitmap
Posted: Sat Mar 01, 2014 08:50 PM

I can not change the image at runtime system

http://www.casimages.com.br/i/140301094 ... 3.jpg.html

REDEFINE TABS oTabs ID 161 OF oDlg1 ;
PROMPT nFolder[1,2],nFolder[2,2],nFolder[3,2],nFolder[4,2],nFolder[5,2],nFolder[6,2],nFolder[7,2],nFolder[8,2] ;
BITMAPS iif(aRegiao[1,1]='S',"delete0",""),iif(aRegiao[2,1]='S',"delete0",""),iif(aRegiao[3,1]='S',"delete0",""), ;
iif(aRegiao[4,1]='S',"delete0",""),iif(aRegiao[5,1]='S',"delete0",""),iif(aRegiao[6,1]='S',"delete0",""), ;
iif(aRegiao[7,1]='S',"delete0",""),iif(aRegiao[8,1]='S',"delete0","")

Gracias

Luiz Fernando
fivewin 1104

James Bott

Posts: 4840

Joined: Fri Nov 18, 2005 04:52 PM

Re: TABS bitmap
Posted: Tue Mar 04, 2014 05:23 PM

Luiz,

I am assuming you want to change them while the folders are open depending on conditions changing? If so, I think you need to use the setBitmap() method.

James

FWH 18.05/xHarbour 1.2.3/BCC7/Windows 10

ukoenig

Posts: 4043

Joined: Wed Dec 19, 2007 06:40 PM

Re: TABS bitmap
Posted: Tue Mar 04, 2014 09:49 PM

Luiz,

Maybe rebuild the Bitmap-array ?

aImage := { NIL, c_Path1 + "Paint.Bmp", c_Path1 + "Paint.Bmp" }

REDEFINE TABS ID 100 oTabs OF oDlg ;
PROMPTS "One", "Two", "Three" UPDATE

oTabs:acBitmaps := aImage

You can delete the bitmaps like :

FOR n := 1 to len( oTabs:ahBitmaps )
IF oTabs:ahBitmaps[ n ] != nil
oTabs:ahBitmaps[ n ] := NIL
ENDIF
NEXT
oTabs:Refresh()

best regards
Uwe

Since 1995 ( the first release of FW 1.9 )

i work with FW.

If you have any questions about special functions, maybe i can help.

Luisão PITBULL

Posts: 22

Joined: Fri May 04, 2012 03:26 PM

Re: TABS bitmap
Posted: Wed Mar 12, 2014 08:59 PM

Ukoenig,thanks for the help, worked 100%

Code (fw): Select all Collapse

for n:=1 to len(oTabs:ahBitmaps)
     if aRegiao[n,1]<>'S'
        oTabs:ahBitmaps[ n ] := ""
     else
        oTabs:ahBitmaps[ n ] := LoadBitMap( GetResources(), "delete0" )
     endif
next
oTabs:acBitMaps := aImagens
oTabs:refresh()

Many thanks

Luiz Fernando

FiveTech Support Forums

Continue the discussion