FoxPro/Visual FoxPro - wait wind

hola:

hay alguna posibilidad de cambiar el tamaño de la fuente del mensaje que sale en un wait wind con alguna sentencia dentro de un prg??

saludos

saludos...

Hasta donde yo sé, no creo que exista lo que pides en vfp...probablemente en alguna clase...

Ojalá y esté equivocado...

Suerte►


-----------------------------
SYSTEM FAILURE
-----------------------------

Eduardo, lo que ti requieres solo se puede a partir de la version 7, y esto es que vfp toma este atributo de fuente desde la oprcion, panel de control, pantalla, apariencia. Saludos

so lo que quieres es personalizar tus mensajes crea que propia caja de mensajes

* MessageBox() Flags
#DEFINE MB_OK 0
#DEFINE MB_OKCANCEL 1
#DEFINE MB_ABORTRETRYIGNORE 2
#DEFINE MB_YESNOCANCEL 3
#DEFINE MB_YESNO 4
#DEFINE MB_RETRYCANCEL 5

*| icons
#DEFINE MB_ICONSTOP 16
#DEFINE MB_ICONQUESTION 32
#DEFINE MB_ICONEXCLAMATION 48
#DEFINE MB_ICONINFORMATION 64
#DEFINE MB_USERICON 128

*| default buttons
#DEFINE MB_DEFBUTTON1 0
#DEFINE MB_DEFBUTTON2 256 && &H100
#DEFINE MB_DEFBUTTON3 512 && &H200
#DEFINE MB_DEFBUTTON4 768 && &H300

*| modality
#DEFINE MB_APPLMODAL 0
#DEFINE MB_SYSTEMMODAL 4096 && &H1000
#DEFINE MB_TASKMODAL 8192 && &H2000
#DEFINE MB_HELP 16384 && &H4000 -- Help Button

*| misc
#DEFINE MB_NOFOCUS 32768 && &H8000
#DEFINE MB_SETFOREGROUND 65536 && &H10000
#DEFINE MB_DEFAULT_DESKTOP_ONLY 131072 && &H20000

*| positioning
#DEFINE MB_TOPMOST 262144 && &H40000
#DEFINE MB_RIGHT 524288 && &H80000
#DEFINE MB_RTLREADING 1048576 && &H100000

*| notif.
#DEFINE MB_SERVICE_NOTIFICATION 2097152 && &H200000
#DEFINE MB_SERVICE_NOTIFICATION_NT3X 262144 && &H40000

*| masks
#DEFINE MB_TYPEMASK 15
#DEFINE MB_ICONMASK 240 && &HF0
#DEFINE MB_DEFMASK 3840 && &HF00
#DEFINE MB_MODEMASK 12288 && &H3000
#DEFINE MB_MISCMASK 49152 && &HC000

DECLARE INTEGER MessageBox IN user32 As MsgBox;
INTEGER hwnd,;
STRING lpText,;
STRING lpCaption,;
INTEGER wType

DECLARE INTEGER GetActiveWindow IN user32

hwnd = GetActiveWindow()
*!* ? MsgBox (0, "Message Text", "Message Caption",;
*!* MB_ABORTRETRYIGNORE + MB_ICONEXCLAMATION +;
*!* MB_DEFBUTTON3 + MB_SYSTEMMODAL)

MsgBox (0, "Message Text11","Message Caption", MB_ICONQUESTION +;
MB_DEFBUTTON3 + MB_SYSTEMMODAL)


Suerte