FiveTech Support Forums

Hola

Porfis ayudenme no me queda un combobox dentro de un ToolBar

ahora si estoy muy atorada con eso y de seguro es algo facil para los que saben pero yo no sepo, no me gusta molestar pero ayudenme porfis

el combobox sale oculto y cuando le doy click en donde se supone que esta si aparece y funciona pero si minimiso el programa se buelve a esconder abajo del ToolBar

a si lo tengo en mi programa

DEFINE WINDOW oWnd FROM 2, 2 TO 35, 85 TITLE "Aida Control de Polizas V 1.00 2007" Color nRgb(230, 230, 250 ),nRgb( 132, 112, 255) ;
MENU BuildMenu()

@ 2.15,35 SENSITIVE SAY oSay PROMPT "Buscar Poliza : " OF oToolBar2 ;
COLOR nRgb(0, 0, 0 ),nRgb(0, 0, 0 )

@ 2.50,35 Get oGet var getbuca OF oToolBar2 size 120,20

@ 2.32,52 COMBOBOX cAcom VAR listb ITEMS {"AUTOS","VIDA","GMM","DAÑOS"} OF oToolBar2 SIZE 120,80

oImgList1 = TImageList():New( 46, 46 ) // width and height of bitmaps

oImgList1:AddMasked( TBitmap():Define( "doctor1",, oWnd ), nRGB( 255, 0, 255 ) )
oImgList1:AddMasked( TBitmap():Define( "disks",, oWnd ), nRGB( 255, 0, 255 ) )

oImgList3 = TImageList():New( 30,30 ) // width and height of bitmaps
oImgList3:AddMasked( TBitmap():Define( "internet",, oWnd ), nRGB( 255, 0, 255 ) )
oImgList3:AddMasked( TBitmap():Define( "quit",, oWnd ), nRGB( 255, 0, 255 ) )

// Now we create the rebar

oReBar = TReBar():New( oWnd )

// Now we create the toolbars and add the buttons
oToolBar1 = TToolBar():New( oReBar, 60, 60, oImgList1 )
oToolBar1:AddButton( { || Main2() }, "Mantenimiento de bases de datos", "Mantenimiento" )
oToolBar1:AddButton( { || MIPDF()}, "Respaldar bases de datos", "Respaldo" )

oToolBar2 = TToolBar():New( oReBar, 70, 70, oImgList2 )

oToolBar3 = TToolBar():New( oReBar, 43, 43, oImgList3 )
oToolBar3:AddButton( { || navega() }, "Checar nuevas versiones",;
"Upgrade" )
// oToolBar3:AddButton( { || ordenaA() }, "Users management", "Users" )
// oToolBar3:AddSeparator()
oToolBar3:AddButton( { || oWnd:End() }, "Fin del programa", "Salida" )

// We set the widths for each toolbar
oToolBar1:nWidth = 150
oToolBar2:nWidth = 500
oToolBar3:nWidth = 150

    // Now we insert the toolbars into the rebar

oReBar:InsertBand( oToolBar1 )
oReBar:InsertBand( oToolBar2 )
oReBar:InsertBand( oToolBar3 )

Saludos

Aida