Hola Adhemar:
Tienes raz贸n, existe un error en FiveWin.ch (Ojo Antonio/Daniel)
Dice:
Debe decir:
Un abrazo.
Manuel Mercado.
acuellar wrote:Definitivamente con FILE funciona con 4 imagenes y con RESNAME no.
Tienes raz贸n, existe un error en FiveWin.ch (Ojo Antonio/Daniel)
Dice:
#xcommand REDEFINE BTNBMP [<oBtn>] ;
聽 聽 聽 聽 聽 聽 聽[ ID <nId> ] ;
聽 聽 聽 聽 聽 聽 聽[ <bar: OF, BUTTONBAR > <oBar> ] ;
聽 聽 聽 聽 聽 聽 聽[ <resource: NAME, RESNAME, RESOURCE> <cResName1> ;
聽 聽 聽 聽 聽 聽 聽 聽 [,<cResName2>[,<cResName3>][,<cResName4>] ] ] ;
聽 聽 聽 聽 聽 聽 聽[ <file: FILE, FILENAME, DISK> <cBmpFile1> ;
聽 聽 聽 聽 聽 聽 聽 聽[,<cBmpFile2>[,<cBmpFile3>[,<cBmpFile4>] ] ] ] ;
聽 聽 聽 聽 聽 聽 聽[ <action:ACTION,EXEC,ON CLICK> <uAction,...> ] ;
聽 聽 聽 聽 聽 聽 聽[ MESSAGE <cMsg> ] ;
聽 聽 聽 聽 聽 聽 聽[ <adjust: ADJUST > ] ;
聽 聽 聽 聽 聽 聽 聽[ WHEN <uWhen> ] ;
聽 聽 聽 聽 聽 聽 聽[ <lUpdate: UPDATE> ] ;
聽 聽 聽 聽 聽 聽 聽[ TOOLTIP <cToolTip> ] ;
聽 聽 聽 聽 聽 聽 聽[ PROMPT <cPrompt> ] ;
聽 聽 聽 聽 聽 聽 聽[ FONT <oFont> ] ;
聽 聽 聽 聽 聽 聽 聽[ <lNoBorder: NOBORDER> ] ;
聽 聽 聽 聽 聽 聽 聽[ <layout: CENTER, TOP, LEFT, BOTTOM, RIGHT> ] ;
聽 聽 聽 聽 聽 聽 聽[ <l2007: 2007> ] ;
聽 聽 聽 聽 聽 聽 聽[ <lTrans: TRANSPARENT> ] ; 聽 聽 聽 聽 聽 聽
聽 聽 聽 => ;
聽 聽 聽 聽 聽[ <oBtn> := ] TBtnBmp():ReDefine( <nId>, <cResName1>, <cResName2>,;
聽 聽 聽 聽 聽 聽 <cBmpFile1>, <cBmpFile2>, <cMsg>, [{|Self|<uAction>}],;
聽 聽 聽 聽 聽 聽 <oBar>, <.adjust.>, <{uWhen}>, <.lUpdate.>, <cToolTip>,;
聽 聽 聽 聽 聽 聽 <cPrompt>, <oFont>, [<cResName3>], [<cBmpFile3>], [!<.lNoBorder.>],;
聽 聽 聽 聽 聽 聽 [ Upper(<(layout)>) ], <.l2007.>,[<cResName4>], [<cBmpFile4>], <.lTrans.> )Debe decir:
#xcommand REDEFINE BTNBMP [<oBtn>] ;
聽 聽 聽 聽 聽 聽 聽[ ID <nId> ] ;
聽 聽 聽 聽 聽 聽 聽[ <bar: OF, BUTTONBAR > <oBar> ] ;
聽 聽 聽 聽 聽 聽 聽[ <resource: NAME, RESNAME, RESOURCE> <cResName1> ;
聽 聽 聽 聽 聽 聽 聽 聽 [,<cResName2>[,<cResName3>[,<cResName4>] ] ] ];
聽 聽 聽 聽 聽 聽 聽[ <file: FILE, FILENAME, DISK> <cBmpFile1> ;
聽 聽 聽 聽 聽 聽 聽 聽[,<cBmpFile2>[,<cBmpFile3>[,<cBmpFile4>] ] ] ] ;
聽 聽 聽 聽 聽 聽 聽[ <action:ACTION,EXEC,ON CLICK> <uAction,...> ] ;
聽 聽 聽 聽 聽 聽 聽[ MESSAGE <cMsg> ] ;
聽 聽 聽 聽 聽 聽 聽[ <adjust: ADJUST > ] ;
聽 聽 聽 聽 聽 聽 聽[ WHEN <uWhen> ] ;
聽 聽 聽 聽 聽 聽 聽[ <lUpdate: UPDATE> ] ;
聽 聽 聽 聽 聽 聽 聽[ TOOLTIP <cToolTip> ] ;
聽 聽 聽 聽 聽 聽 聽[ PROMPT <cPrompt> ] ;
聽 聽 聽 聽 聽 聽 聽[ FONT <oFont> ] ;
聽 聽 聽 聽 聽 聽 聽[ <lNoBorder: NOBORDER> ] ;
聽 聽 聽 聽 聽 聽 聽[ <layout: CENTER, TOP, LEFT, BOTTOM, RIGHT> ] ;
聽 聽 聽 聽 聽 聽 聽[ <l2007: 2007> ] ;
聽 聽 聽 聽 聽 聽 聽[ <lTrans: TRANSPARENT> ] ; 聽 聽 聽 聽 聽 聽
聽 聽 聽 => ;
聽 聽 聽 聽 聽[ <oBtn> := ] TBtnBmp():ReDefine( <nId>, <cResName1>, <cResName2>,;
聽 聽 聽 聽 聽 聽 <cBmpFile1>, <cBmpFile2>, <cMsg>, [{|Self|<uAction>}],;
聽 聽 聽 聽 聽 聽 <oBar>, <.adjust.>, <{uWhen}>, <.lUpdate.>, <cToolTip>,;
聽 聽 聽 聽 聽 聽 <cPrompt>, <oFont>, [<cResName3>], [<cBmpFile3>], [!<.lNoBorder.>],;
聽 聽 聽 聽 聽 聽 [ Upper(<(layout)>) ], <.l2007.>,[<cResName4>], [<cBmpFile4>], <.lTrans.> )Un abrazo.
Manuel Mercado.
manuelmercado at prodigy dot net dot mx
