[Harbour] Support for Class TopBarMenu of Clipper 5.3

Guillermo Varona Silupú gvarona at ec-red.com
Fri Aug 24 14:53:57 EDT 2007


Siguiendo con los menu's, he logrado avanzar un poco mas, para lo cual 
he tenido que modificar el programa fuente ttopbar.prg de la siguiente 
manera:
Continuing with the menu' s, I have managed to advance a little but, for 
which I have had that to modify the source program ttopbar.prg in the 
following way: 

file: ttopbar.prg, Line 419
419         ::aItems[ n ]:data:SetCoors( ::row + 1, ::aItems[ n 
]:column, .t. )
419         ::aItems[ n ]:data:SetCoors( n, ::row + 1, ::aItems[ n 
]:column, .t. )

Ahora obtengo el siguiente mensaje de error:
Now I obtain the following error message: 

Error BASE/1004  Message not found: POPUPMENU:ISQUICK
Called from __ERRRT_SBASE(0)
Called from POPUPMENU:ERROR(172)
Called from (b)HBOBJECT(103)
Called from POPUPMENU:MSGNOTFOUND(0)
Called from POPUPMENU:ISQUICK(162)
Called from TOPBARMENU:ISQUICK(485)
Called from TOPBARMENU:ISSHORTCUT(463)
Called from TOPBARMENU:MODAL(873)
Called from MENUMODAL(98)
Called from MAIN(46)

Preguntas:
Questions:

1.- Quien hace estos cambios en el servidor (repositorio)
2.- Como se puede ver en el ejemplo, esta Linea:

      oTopBar := TopBar( 0, 10, 50)

   Indica que el menu debe aparecer en la columna 10, pero siempre aparece en la columna 0.

3.- Al inicio, el menu se muestra con un parpadeo molesto, este desaparece despues de presionar cualquier tecla.
4.- No funciona el mouse.
5.- ¿Harbour es totalmente compatible con el Clipper 5.3b?. Sucede que he desarrollado una pequeña aplicación con Clipper 5.3b, y al querer pasarlo a Harbour estoy teniendo estos problemas.

Espero me puedan ayudar.


ENGLISH
1.- Who makes these changes in the servant (repository)
2.- As can be seen in the example, this Line: 

oTopBar: = TopBar (0, 10, 50)

It indicates that the menu should appear in the column 10, but always 
appears in the column 0. 

3.- Al start, the menu is shown with an uncomfortable blinking, this 
disappears despues to pressure any key. 
4.- Not the mouse functions. 
5.- ¿Harbour is completely compatible with the Clipper 5.3b?.  It 
happens that I have developed a small application with Clipper 5.3b, and 
al wanted to pass it to Harbour I am having these problems. 

I expect they can help me. 

Salu2,
GVS




More information about the Harbour mailing list