FiveTech Support Forums

FiveWin / Harbour / xBase community
Board indexAll discussionsLogin (GitHub)
Board index FiveWin para Harbour/xHarbour problemas con las toolbars y rebars
Jos茅 Luis S谩nchez
Posts: 564
Joined: Thu Oct 13, 2005 09:23 AM
problemas con las toolbars y rebars
Posted: Wed Jan 24, 2007 09:10 AM
Hola:
Estoy intentando cambiar una buttonbar por una toolbar en un programa. La llamada al m茅todo que crea la toolbar en la ventana principal la pongo despues de definir la ventana y antes de activarla. El codigo que uso es este:

Code: Select all Collapse
::oImgList = TImageList():New( 44, 44 ) // width and height of bitmaps

   ::oImgList:AddMasked( TBitmap():Define( "BB_ACTIVIDAD",, ::oWndMain ), nRGB( 255, 0, 255 ) )

   ::oReBar = TReBar():New( ::oWndMain )

   ::oToolBar = TToolBar():New( ::oReBar, 50, 50, ::oImgList, .t. )

   ::oToolBar:AddButton( { || Actividad() }, "Gesti贸n del fichero de actividades", )
   ::oToolBar:AddSeparator()

   ::oToolBar:nWidth = 290

   ::oReBar:InsertBand( ::oToolBar )


y cuando lanzo el programa se crea la toolbar pero el bitmap de dentro no aparece. El recurso existe, es el mismo que usaba en un bot贸n de la btnbar. Adem谩s cuando hago click en el boton el programa se cuelga irremediablemente.

Tengo FWH 2.7 de diciembre de 2005 y xHB 0.99.6

驴 Alguna idea de que puede pasar ?

Saludos,
Jos茅 Luis S谩nchez
Posts: 564
Joined: Thu Oct 13, 2005 09:23 AM
problemas con las toolbars y rebars
Posted: Wed Jan 24, 2007 09:13 AM

Olvide decir que los ejemplos de toolbars que tengo en SAMPLES van de co帽a.

:(

Antonio Linares
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
problemas con las toolbars y rebars
Posted: Wed Jan 24, 2007 09:13 AM

Jos茅 Luis,

Los bitmaps que usas miden todos igual y son de 44x44 como indicas en el c贸digo ?

regards, saludos

Antonio Linares
www.fivetechsoft.com
Jos茅 Luis S谩nchez
Posts: 564
Joined: Thu Oct 13, 2005 09:23 AM
problemas con las toolbars y rebars
Posted: Wed Jan 24, 2007 09:23 AM
Antonio:
Eso lo copie de un jemplo y est谩 mal. Los bitmaps que uso son de 36*36 y ya lo he corregido.
Ahora me queda arreglar lo del cuelgue del programa. Con el butonbar me iba de co帽a asi:

Code: Select all Collapse
   DEFINE BUTTON OF ::oBar ;
      RESOURCE "BB_ACTIVIDAD";
      TOOLTIP i18n( "Gesti贸n de ejercicios y actividades" ) ;
      MESSAGE i18n( "Gesti贸n del fichero de ejercicios y actividades." ) ;
      ACTION Actividad()    ;
      NOBORDER


No entiendo porque con esto

Code: Select all Collapse
::oToolBar:AddButton( { || Actividad() }, "Gesti贸n del fichero de actividades", )


se cuelga el programa. No se si es por lo que dije de donde creo la toolbar, lo hago despues del define window y antes del activate, llamando a un m茅todo de la clase de la aplicaci贸n. 驴 Hay que crear la toolbar en el on init de la ventano o eso es s贸lo para dialogos ?

Saludos,
Antonio Linares
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
problemas con las toolbars y rebars
Posted: Wed Jan 24, 2007 09:51 AM

Jos茅 Luis,

Es correcto como la creas. Has probado a llamar a MsgInfo() en vez de a Actividad() y ver si funciona ?

Cuando dices cuelgue te refieres a un GPF 贸 a que la aplicaci贸n deja de responder ?

regards, saludos

Antonio Linares
www.fivetechsoft.com
Jos茅 Luis S谩nchez
Posts: 564
Joined: Thu Oct 13, 2005 09:23 AM
problemas con las toolbars y rebars
Posted: Wed Jan 24, 2007 10:44 AM

Si hago un msginfo si que me lo saca, pero la llamada a la funci贸n que hace el matenimineto cluega el programa. No es un GPF, sino que el programa deja de funcionar.

Saludos,

Continue the discussion

Static archive 路 New replies & topics via GitHub Discussions