Cómo Personalizar Mensages en Visual Fox.

3,552 views
Skip to first unread message

stallman stallman

unread,
Apr 29, 2011, 8:16:32 PM4/29/11
to publice...@googlegroups.com
Buenas Tardes Estimados.

- Por favor quisiera saber cómo personalizo los mensajes con opciones a la hora de presentarlos al usuario en Visual Fox Pro?, por ejemplo:

 - A la hora de ingresar el código de un producto, si no se encuentra el código del producto, enviar un mensaje como:

"El Código de Producto no se Encuentra Registrado, Desea Registrarlo "  ..   y dar las siguientes opciones:

1- Si  
2- No 
3-Consultar Catálogo


Les agradezco mucho la colaboración.

MAC HOWARD

unread,
Apr 29, 2011, 8:22:09 PM4/29/11
to publice...@googlegroups.com
Salu-2

Utiliza la MESSAGEBOX()

Ejem:

if messagebox("El Código de Producto no se Encuentra Registrado, Desea
Registrarlo",3+64,"Productos) =6
si lo registra
else
no lo registra
endif


El 29/04/11, stallman stallman <stall...@gmail.com> escribió:


--
Hasta Pronto !

________________________________
HOWARD OROZCO POLO
Analista Programador de Sistemas
Barranquilla - Colombia
http://www.machowardop.blogspot.com/

stallman stallman

unread,
Apr 29, 2011, 9:23:50 PM4/29/11
to publice...@googlegroups.com
Muchas gracias Howard.

- Existe alguna forma de modificar :

1- El icono en el Mensaje? (actualmente una "X")
2- Los Mensajes: Si  , No , Cancelar?


Saludos.

Douglas Sánchez Guillén

unread,
Apr 29, 2011, 9:39:38 PM4/29/11
to publice...@googlegroups.com
Valor Dialog box buttons

0

OK button only

1

OK and Cancel buttons

2

Abort, Retry, and Ignore buttons

3

Yes, No, and Cancel buttons

4

Yes and No buttons

5

Retry and Cancel buttons

Value Icon

16

Stop sign

32

Question mark

48

Exclamation point

64

Information (i) icon


Fijata en la ayuda los iconos los cambias con 16, 32,, 48,64 segun ti nececidad igual los botoens,  en la ayuda esta claro almenos
que tengas vfp6 q no trae incorporada la ayuda.

salues
--
Ing. Douglas Sánchez Guillén
      Consultor Informatico
Movistar: 505 8759 - 5342
Claro: 505 88495476

Walter R. Ojeda Valiente

unread,
Apr 29, 2011, 9:41:42 PM4/29/11
to publice...@googlegroups.com
Crea un form con esas opciones, el form será invocado con un DO FORM, el valor que quieres que te devuelva debes colocarlo en el método UNLOAD del form.

Saludos.

Walter.




Date: Fri, 29 Apr 2011 18:16:32 -0600
Subject: [vfp] Cómo Personalizar Mensages en Visual Fox.
From: stall...@gmail.com
To: publice...@googlegroups.com

stallman stallman

unread,
Apr 29, 2011, 9:51:55 PM4/29/11
to publice...@googlegroups.com
Excelente Idea. Gracias!

stallman stallman

unread,
Apr 29, 2011, 9:52:24 PM4/29/11
to publice...@googlegroups.com
Muchas Gracias Douglas.

MAC HOWARD

unread,
Apr 30, 2011, 12:17:35 PM4/30/11
to publice...@googlegroups.com
Salu-2

No que yo sepa. Pero tengo una fuente que encontré en internet donde
puedes hacer eso..

Anexo te la envio


El 29/04/11, stallman stallman <stall...@gmail.com> escribió:

_MSGBOX.txt

stallman stallman

unread,
Apr 30, 2011, 3:42:08 PM4/30/11
to publice...@googlegroups.com
Hola HOWARD!

Muchas gracias por compartir el código, es justo lo que buscaba, sin embargo me da el siguiente error:

1- Cuando invoco el "_msgbox"  me abre el archivo _msgbox.prg , me marca donde dice  PROCEDURE MSGBOX  y da un mensaje que dice: Error del Programa, no se encuentra la instrucción PARAMETER.    

MAC HOWARD

unread,
Apr 30, 2011, 5:31:05 PM4/30/11
to publice...@googlegroups.com
Salu-2

Disculpa se me habia olvidado. Anexo te envio

El 30/04/11, stallman stallman <stall...@gmail.com> escribió:

_msgbox.prg

stallman stallman

unread,
Apr 30, 2011, 6:02:41 PM4/30/11
to publice...@googlegroups.com
Muchas gracias Howard.

- En el primer archivo que me pasastes (_MSGBOX.txt) el problema es que se invoca a _msgbox.prg   y dentro del código el procedimiento se llama msgbox

- Lo estoy tratando de implementar: Ahora me pide otro procedimiento: _GETSUBTEXT.prg

Luis Maria Guayan

unread,
Apr 30, 2011, 6:32:01 PM4/30/11
to publice...@googlegroups.com
El MessageBox() nativo de VFP tiene para elegir, en el segundo parámetro, los siguientes íconos:

Value Icon

16

Stop sign

32

Question mark

48

Exclamation point

64

Information (i) icon


Luis María Guayán
Tucumán, Argentina
_________________________
http://www.PortalFox.com
Nada corre como un zorro
_________________________

MAC HOWARD

unread,
Apr 30, 2011, 7:20:21 PM4/30/11
to publice...@googlegroups.com
Salu-2

Que pena no incluirte todos los archivos. Anexo te lo envio

El 30/04/11, stallman stallman <stall...@gmail.com> escribió:

> Muchas gracias Howard.
>
> - En el primer archivo que me pasastes (*_MSGBOX.txt*) el problema es que se


> invoca a _msgbox.prg y dentro del código el procedimiento se llama msgbox
>
> - Lo estoy tratando de implementar: Ahora me pide otro procedimiento:
> _GETSUBTEXT.prg
>

_getsubtext.prg

stallman stallman

unread,
Apr 30, 2011, 7:37:54 PM4/30/11
to publice...@googlegroups.com
Muchas Gracias Estimado.

Me funcionó excelente.

stallman stallman

unread,
May 1, 2011, 12:48:32 AM5/1/11
to publice...@googlegroups.com
Estimado Howard.

- Tengo Dos dudas, quizás me puedas ayudar:

1- Independientemente cual sea la combinación de botones que uno elija, siempre después de un click en cualquier botón me sale un MessageBox que me indica cúal de los botones de opciones se presionó: ¿Dónde elimino éso, que no salga ese mensaje?

2- Qué se debe hacer para que aparezcan las imágenes ico, ya que en el mensaje lo único que sale es un cuado con una gran "x" de lado a lado.

Te agradezco me puedas ayudar.

Jose Zurita

unread,
May 2, 2011, 9:18:55 AM5/2/11
to PublicesvFoxpro
Saludos: he realizdo pruebas pero mem anda un error, adjunto mensaje



> Date: Sat, 30 Apr 2011 16:31:05 -0500
> Subject: Re: [vfp] Cómo Personalizar Mensages en Visual Fox.
> From: sistemas...@gmail.com
> To: publice...@googlegroups.com
_msgbox.doc

MAC HOWARD

unread,
May 2, 2011, 2:00:41 PM5/2/11
to publice...@googlegroups.com
_getsubtext.prg
_msgbox.prg

miltonvas

unread,
May 2, 2011, 11:08:56 PM5/2/11
to Comunidad de Visual Foxpro en Español
A mi tambien me sale el mismo error quer no encuentra el procedimiento
getsubstr



On 2 mayo, 08:18, Jose Zurita <jzur...@hotmail.com> wrote:
> Saludos: he realizdo pruebas pero mem anda un error, adjunto mensaje> Date: Sat, 30 Apr 2011 16:31:05 -0500
> > Subject: Re: [vfp] Cómo Personalizar Mensages en Visual Fox.
> > From: sistemaswebda...@gmail.com
> > To: publice...@googlegroups.com
>
> > Salu-2
>
> > Disculpa se me habia olvidado. Anexo  te envio
>
> > El 30/04/11, stallman stallman <stallma...@gmail.com> escribió:
> > > Hola HOWARD!
>
> > > Muchas gracias por compartir el código, es justo lo que buscaba, sin embargo
> > > me da el siguiente error:
>
> > > 1- Cuando invoco el "_msgbox"  me abre el archivo _msgbox.prg , me marca
> > > donde dice  PROCEDURE MSGBOX  y da un mensaje que dice: Error del Programa,
> > > no se encuentra la instrucción PARAMETER.
>
> > --
> > Hasta Pronto !
>
> > ________________________________
> > HOWARD OROZCO POLO
> > Analista Programador de Sistemas
> > Barranquilla - Colombia
> >http://www.machowardop.blogspot.com/
>
>
>
>  _msgbox.doc
> 135 KVerDescargar

stallman stallman

unread,
May 2, 2011, 11:15:36 PM5/2/11
to publice...@googlegroups.com

Hola ! miltonvas.


Debes agregar a tu archivo  *.prg  el procedimiento  _MSGBOX   como el  _GetSubText, los cuales te adjunto.


Saludos

_getsubtext.prg
_msgbox.prg

sergio garcia

unread,
May 3, 2011, 11:15:39 AM5/3/11
to publice...@googlegroups.com
Buenos días solo primero renombrar a rar el archivo adjunto este lo use en
una aplicación hace muchos años y lo colocan en su proyecto, luego si
quieren probarlo en la pantalla de comando de fox pueden colocar.

?_msgbox("Completamente Seguro de dar Salida al Paciente De Consulta y
Facturar ?", 4+32+256, "Titulo del Mensaje","\<Si","\<No")

Sonidos.r4r son los sonidos
Mensajes.r4r son las imágenes utilizadas

Saludos


______________________________________
Desarrollos de software
E-mail: gere...@magicsoft.com.gt
Aletrnativo: in...@magicsoft.com.gt
Web: www.magicsoft.com.gt


-----Mensaje original-----
De: publice...@googlegroups.com
[mailto:publice...@googlegroups.com] En nombre de miltonvas
Enviado el: lunes, 02 de mayo de 2011 09:09 p.m.
Para: Comunidad de Visual Foxpro en Español
Asunto: [vfp] Re: Cómo Personalizar Mensages en Visual Fox.

__________ Información de NOD32, revisión 6089 (20110502) __________

Este mensaje ha sido analizado con NOD32 antivirus system
http://www.nod32.com

PRGS.z4p
sonidos.r4r
mensajes.r4r

stallman stallman

unread,
May 3, 2011, 1:08:29 PM5/3/11
to publice...@googlegroups.com
Muchas Gracias Sergio.
 
- Solo una duda: Donde ubico los archivos  *.bmp   y   *.wav
 
 
gracias!

sergio garcia

unread,
May 3, 2011, 2:30:47 PM5/3/11
to publice...@googlegroups.com

En donde tú quieras en donde está tu proyecto normalmente debes tener un directorio de imágenes

 

 

 

 

______________________________________

Desarrollos de software

E-mail:    gere...@magicsoft.com.gt

Aletrnativo: in...@magicsoft.com.gt

Web:      www.magicsoft.com.gt

magicblancoimage003

image001.png
image002.jpg
Reply all
Reply to author
Forward
0 new messages