FiveTech Support Forums

Antonio, Como Hacer Para Poner dos(2) BUTTONBAR en una ventana MDI??

LOCAL oBar, oBar2

DEFINE BUTTONBAR oBar _3D SIZE 26, 27 OF oWnd TOP

DEFINE BUTTONBAR oBar2 _3D SIZE 26, 27 OF oWnd TOP

Has probado a usar las nuevas ToolBar(), van muy bien.

oBar:=TReBar():New(oWndMdi)

DEFINE TOOLBAR oBarMdi OF oBar SIZE nSize, nSize+14 ;
IMAGELIST oImgList BALLOON // tooltips balloon style

De esta forma puedes crear varias toolbar y asignarlas a la Clase TReBar.
Para que te muestre los iconos tendras que crear una ImageList :

nSize:=32
oImgList:=TimageList():New(nSize,nSize)
// Y aqui ir añadiendo todos los bitmaps
oImgList:AddMasked( TBitmap():Define( ,cBmp, oWndMdi), nRGB( 192, 192, 192 ) )

Mira los samples de fwh que hay dos o tres con los que lo verás super-claro.

Un saludo.

AngelSalom wrote:Has probado a usar las nuevas ToolBar(), van muy bien.

oBar:=TReBar():New(oWndMdi)

DEFINE TOOLBAR oBarMdi OF oBar SIZE nSize, nSize+14 ;
IMAGELIST oImgList BALLOON // tooltips balloon style

De esta forma puedes crear varias toolbar y asignarlas a la Clase TReBar.
Para que te muestre los iconos tendras que crear una ImageList :

nSize:=32
oImgList:=TimageList():New(nSize,nSize)
// Y aqui ir añadiendo todos los bitmaps
oImgList:AddMasked( TBitmap():Define( ,cBmp, oWndMdi), nRGB( 192, 192, 192 ) )

Mira los samples de fwh que hay dos o tres con los que lo verás super-claro.

Un saludo.

Gracias Angel...

Angel, porque con la otra BUTTONBAR nativa del fivewin, no funciona??

Saludos y muchas gracias.

João,

Porque no han sido diseñadas para trabajar con múltiples filas. Las rebars y toolbars, si.