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
DOS BUTTONBAR
DOS BUTTONBAR
João Santos - São Paulo - Brasil
- AngelSalom
- Posts: 664
- Joined: Fri Oct 07, 2005 7:38 am
- Location: Vinaros (Castellón ) - España
- Contact:
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.
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.
Angel Salom
http://www.visionwin.com
---------------------------------------------
fwh 19.05 - harbour 3.2 - bcc 7.0
http://www.visionwin.com
---------------------------------------------
fwh 19.05 - harbour 3.2 - bcc 7.0
Gracias Angel...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.
Angel, porque con la otra BUTTONBAR nativa del fivewin, no funciona??
Saludos y muchas gracias.
João Santos - São Paulo - Brasil
- Antonio Linares
- Site Admin
- Posts: 37481
- Joined: Thu Oct 06, 2005 5:47 pm
- Location: Spain
- Contact: