Cria um objeto para alterar as características da fonte utilizada em outros controles visuais.
Hierarquia
- TFontAbs
- TFont
Construtores
Propriedades
Exemplos
Exemplo 1
#include "TOTVS.CH" User Function TFont() DEFINE DIALOG oDlg TITLE "Exemplo TFont" FROM 180,180 TO 550,700 PIXEL // TFont oTFont := TFont():New('Courier new',,-16,.T.) // Aplica Font em um TSay oTSay := TSay():New( 01, 01,{||'TSay para teste do TFont (usado Courier new)'},oDlg; ,,oTFont,.T.,.F.,.F.,.T.,0,,250,20,.F.,.T.,.F.,.F.,.F.,.F. ) Name := oTFont:Name nWidth := oTFont:nWidth nHeigh := oTFont:nHeight Bold := oTFont:Bold Italic := oTFont:Italic Underline := oTFont:Underline ACTIVATE DIALOG oDlg CENTERED Return
Resultado do Exemplo
Abrangência
Microsiga Protheus 8.11, Microsiga Protheus 11, Protheus 10, TOTVS Application Server 10, ByYou Application Server
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas