FoxPro/Visual FoxPro - Manejo de barra de herramientas

   
Vista:

Manejo de barra de herramientas

Publicado por ANTONIO MARTIN (55 intervenciones) el 17/10/2007 20:53:14
Saludos a todos... trabajo con vfp 6, tengo un formulario que permite imprimir o modificar un informe, la situacion es la siguiente: cuando modifico por primera vez me muestra la barra de herramientas controles de informes pero cuado lo trato de modificar nuevamente ya no me aparece la barra y lo que tengo que hacer es salir de la aplicacion y eliminar los archivos foxuser y volver a entrar, alguno sabe que comando se llama para que muestre la barra de herramientas controles de informes por programación..

De antemano gracias por sus respuesta....
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Manejo de barra de herramientas

Publicado por Ernesto Hernandez (4632 intervenciones) el 18/10/2007 02:33:09
lo puedes personalizar desde VFP no ?
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Manejo de barra de herramientas

Publicado por ANTONIO MARTIN (55 intervenciones) el 18/10/2007 02:40:15
Gracias Ernesto, la idea de poner la modificacion de informes en el ejecutable es porque distribuyo varias aplicaciones y no desea cargar vfp en las maquinas de todos los clientes solo para modificar informes, ojala puedes ayudarme.

Nuevamente gracias y saludos...
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Manejo de barra de herramientas

Publicado por Ernesto Hernandez (4632 intervenciones) el 18/10/2007 02:48:39
guarda esto en un .PRG llamado test.PRG por ejemplo
LPARAMETERS oToolbar
PUBLIC oHandler
oHandler = NEWOBJECT("myHandler")
BINDEVENT(oToolbar, "MouseDown", oHandler, "myMouseDown")
BINDEVENT(oToolBar, "DblClick", oHandler, "myDblClick")

DEFINE CLASS myHandler AS Custom
PROCEDURE myMouseDown(nButton, nShift, nXCoord, nYCoord)
NODEFAULT
RETURN
ENDPROC

PROCEDURE myDblClick
NODEFAULT
RETURN
ENDPROC
ENDDEFINE



y despues lo llamas en tu codigo

.....

THIS.PreviewForm.Toolbar.dock(1)
DO test WITH THIS.PreviewForm.Toolbar

Pruebalo
Suerte
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Manejo de barra de herramientas

Publicado por ANTONIO MARTIN (55 intervenciones) el 18/10/2007 04:06:50
Ernesto gracias nuevamente, pero me emocionaste de mas shhh. ya que te recuerdo que trabajo con VFP 6 y el comando BINDEVENT segun he investigado solo existe apartir del VFP 8.

Gracias de todos modos... shhhh...
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar