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
Help!! ayuda!! no me queda bien un combobox en un ToolBar
Help!! ayuda!! no me queda bien un combobox en un ToolBar
Que es mejor que programar? creo que nada
Atropellada pero aqui ando
I love Fivewin
séʌǝɹ ןɐ ɐʇsǝ opunɯ ǝʇsǝ
Atropellada pero aqui ando
I love Fivewin
séʌǝɹ ןɐ ɐʇsǝ opunɯ ǝʇsǝ