Page 1 of 1

No puedo cambiar el Font

Posted: Tue May 21, 2013 11:05 am
by helvant
Muy buenas, por fin estoy arrancando.....

estoy intentando cambiar el font de la window y del dialog, pero no hay forma:

- cuando le digo que quiero cambiar el Font del window no me hace caso, el título sigue en el Font del sistema y los MsgInfo igual, no se lo que estoy haciendo mal:
  • DEFINE FONT oApp:oMainFont NAME "Calibri" SIZE 0, -12

    DEFINE WINDOW oApp:oWnd TITLE oApp:cSistema + " - " + oApp:xVersion ICON oApp:oIcon

    oApp:oWnd:SetFont( oApp:oMainFont )

    SET MESSAGE OF oApp:oWnd TO oApp:cEmpresa DATE KEYBOARD FONT oApp:oMainFont

    ACTIVATE WINDOW oApp:oWnd MAXIMIZED //ON INIT oApp:oWnd:SetFont( oApp:oMainFont )

en el MESSAGE si funciona, tambien, como se ve, lo he intentado en el ON INIT, pero nada, el título sigue en el font del sistema

También lo he intentado en el DIALOG :

DEFINE DIALOG oDlg NAME "REINDEX" WINDOW oApp:oWnd FONT oApp:oMainFont

pero nada, el título del dialog sigue en el font del sistama

¿que me falta o hago mal?

he mirado por el foro pero no encuentro respuesta por eso escribo.

Muchas gracias

Re: No puedo cambiar el Font

Posted: Tue May 21, 2013 2:19 pm
by FranciscoA

Re: No puedo cambiar el Font

Posted: Wed May 22, 2013 10:41 am
by helvant
Bueno, perdona pero lo que se habla en ese post no tiene nada que ver con lo que yo digo, el quiere poner el título en el centro, yo lo que quiero es que mi aplicación use el font que yo quiero, lo consigo con componentes individuales, pero los títulos de los dialogs, el del window principal y los de los mensages emergentes no se cambian, siguen con el font del sistema.

Muchas gracias de todas formas.

Re: No puedo cambiar el Font

Posted: Wed May 22, 2013 12:35 pm
by Pedro
Hola helvant

¿puedes hacer estas pruebas a ver si te cambia la letra?
Te digo esto porque yo he hecho la última prueba, con diferentes tipos de letras y formatos (Bold, Italic) y me cambia el tipo y el formato a ver si en alguna de las pruebas notas que no toma el dato, bien de la ventana o del font

1

Code: Select all

DEFINE FONT oApp:oMainFont NAME "Calibri" SIZE 0, -12
DEFINE WINDOW oWnd TITLE oApp:cSistema + " - " + oApp:xVersion ICON oApp:oIcon
           oWnd:SetFont( oApp:oMainFont )

SET MESSAGE OF oWnd TO oApp:cEmpresa DATE KEYBOARD FONT oApp:oMainFont

ACTIVATE WINDOW oWnd MAXIMIZED 
 
2

Code: Select all

DEFINE FONT oMainFont NAME "Calibri" SIZE 0, -12
DEFINE WINDOW oApp:oWnd TITLE oApp:cSistema + " - " + oApp:xVersion ICON oApp:oIcon
           oApp:oWnd:SetFont( oMainFont )

SET MESSAGE OF oApp:oWnd TO oApp:cEmpresa DATE KEYBOARD FONT oMainFont

ACTIVATE WINDOW oWnd MAXIMIZED 
 
3

Code: Select all

DEFINE FONT oMainFont NAME "Calibri" SIZE 0, -12
DEFINE WINDOW oWnd TITLE oApp:cSistema + " - " + oApp:xVersion ICON oApp:oIcon
           oWnd:SetFont( oMainFont )

SET MESSAGE OF oWnd TO oApp:cEmpresa DATE KEYBOARD FONT oMainFont

ACTIVATE WINDOW oWnd MAXIMIZED 
 

Re: No puedo cambiar el Font

Posted: Thu May 23, 2013 9:21 am
by helvant
Muchas gracias Pedro, no hay forma, he cambiado el tipo de font, aunque no es uno raro, pero no me fiaba, ni el "Courier" me lo acepta, lo curioso es que el font de los botones si _, pero ni los títulos de las ventanas (window y dialog) ni los mensages emergentes.

Saludos

Re: No puedo cambiar el Font

Posted: Thu May 23, 2013 9:49 am
by Antonio Linares
El tamaño del font usado en el título y en los mensajes emergentes, es algo que se configura desde el Panel de control para todo Windows.

Es decir, Windows no permite de forma estandard el modificar esos fonts solo en una aplicación.

Re: No puedo cambiar el Font

Posted: Fri May 24, 2013 11:27 am
by helvant
Perdona Antonio pero no te entiendo, me dices que solo se puede cambiar desde una aplicación..... ¿ eso quiere decir que no puedo cambiar el font de los títulos y los mensajes emergentes de mi programa ?, ¿a que aplicación te refieres ?

Muchas gracias