Buttonbmp and image

[Wanderson]

Hi,

How i can change a bitmap of a buttonbmp in execution time? The bitmap are in resource file.

Thanks in advance.

[ukoenig]

function FromResources()
local oDlg

DEFINE DIALOG oDlg RESOURCE "Test"

REDEFINE BUTTONBMP oBtn1 ID 10 OF oDlg ;
ACTION MsgInfo( "XP themes aware Button Bitmaps" )
oBtn1:LoadBitmap( "Alert" ) // from resource

// Button 2 changes on Action BMP of Button 1
// ----------------------------------------------------
REDEFINE BUTTONBMP oBtn2 ID 20 OF oDlg ;
ACTION ( oBtn1:LoadBitmap( "Arrow" ), oBtn1:Refresh() ) ; // from Resource
BITMAP "..\bitmaps\16x16\garrow.bmp" PROMPT "&Test" TEXTRIGHT // from Disk

ACTIVATE DIALOG oDlg

return nil

Best Regards
Uwe

[Wanderson]

function FromResources()
local oDlg

DEFINE DIALOG oDlg RESOURCE "Test"

REDEFINE BUTTONBMP oBtn1 ID 10 OF oDlg ;
ACTION MsgInfo( "XP themes aware Button Bitmaps" )
oBtn1:LoadBitmap( "Alert" ) // from resource

// Button 2 changes on Action BMP of Button 1
// ----------------------------------------------------
REDEFINE BUTTONBMP oBtn2 ID 20 OF oDlg ;
ACTION ( oBtn1:LoadBitmap( "Arrow" ), oBtn1:Refresh() ) ; // from Resource
BITMAP "..\bitmaps\16x16\garrow.bmp" PROMPT "&Test" TEXTRIGHT // from Disk

ACTIVATE DIALOG oDlg

return nil

Best Regards
Uwe

Thank you!