Tamanho da Fonte
Enviado: 08 Jun 2008 14:52
Boa tarde colegas.
Na MiniGui, e PRG abaixo (ver perguntas abaixo do PRG):
1-Como se seta a fonte e seu tamanho somente para o título da janela (neste caso 'MiniGUI Browse1 Demo' ) ?
2-Idem para as opções de menu (neste caso "File" e "Help") ?
3-Idem para STATUSBAR ?
4-Idem para o título das abas (neste caso, "Tab_1")"?
5-Idem para o header do browse (neste caso, { 'Code' , 'First Name' , 'Last Name', 'Birth Date', 'Married' , 'Biography' }) ?
6-Idem para o texto dos diversos TOOLTIP ?
Tentei várias opções com FONT "cFonte" SIZE nFonte, mas sempre o resultado era de forma global e nunca de forma individual.
Na MiniGui, e PRG abaixo (ver perguntas abaixo do PRG):
Código: Selecionar todos
DEFINE WINDOW Form_1 ;
AT 0,0 ;
WIDTH 640 HEIGHT 480 ;
TITLE 'MiniGUI Browse1 Demo' ;
MAIN NOMAXIMIZE ;
ON INIT OpenTables() ;
ON RELEASE CloseTables()
DEFINE MAIN MENU
POPUP 'File'
ITEM 'Set Browse Value' ACTION Form_1.Browse_1.Value := Val ( InputBox ('Set Browse Value','') )
ITEM 'Get Browse Value' ACTION MsgInfo ( Str ( Form_1.Browse_1.Value ) )
ITEM 'Refresh Browse' ACTION Form_1.Browse_1.Refresh
SEPARATOR
ITEM 'Exit' ACTION Form_1.Release
END POPUP
POPUP 'Help'
ITEM 'About' ACTION MsgInfo ("MiniGUI Browse Demo")
END POPUP
END MENU
DEFINE STATUSBAR
STATUSITEM ''
END STATUSBAR
DEFINE TAB Tab_1 ;
AT 0,10 ;
WIDTH 600 ;
HEIGHT 400 ;
VALUE 1 ;
TOOLTIP 'Tab Control' ;
ON CHANGE ( DoMethod ( 'Form_1' , 'Browse_' + Ltrim( Str( Form_1.Tab_1.Value ) ) , 'SetFocus' ), ;
DoMethod ( 'Form_1' , 'Browse_' + Ltrim( Str( Form_1.Tab_1.Value ) ) , 'Refresh' ) , ChangeTest() )
PAGE 'Page 1'
@ 40,20 BROWSE Browse_1 ;
WIDTH 560 ;
HEIGHT 340 ;
HEADERS { 'Code' , 'First Name' , 'Last Name', 'Birth Date', 'Married' , 'Biography' } ;
WIDTHS { 150 , 150 , 150 , 150 , 150 , 150 } ;
WORKAREA &var ;
FIELDS { 'Test->Code' , 'Test->First' , 'Test->Last' , 'Test->Birth' , 'Test->Married' , 'Test->Bio' } ;
TOOLTIP 'Browse Test' ;
ON CHANGE ChangeTest() ;
JUSTIFY { BROWSE_JTFY_LEFT,BROWSE_JTFY_CENTER, BROWSE_JTFY_CENTER, BROWSE_JTFY_CENTER,BROWSE_JTFY_CENTER,BROWSE_JTFY_CENTER} ;
DELETE ;
LOCK ;
EDIT INPLACE
END PAGE2-Idem para as opções de menu (neste caso "File" e "Help") ?
3-Idem para STATUSBAR ?
4-Idem para o título das abas (neste caso, "Tab_1")"?
5-Idem para o header do browse (neste caso, { 'Code' , 'First Name' , 'Last Name', 'Birth Date', 'Married' , 'Biography' }) ?
6-Idem para o texto dos diversos TOOLTIP ?
Tentei várias opções com FONT "cFonte" SIZE nFonte, mas sempre o resultado era de forma global e nunca de forma individual.
