Histórico da Página

...

Portuguese

Pagetitle

	GetStringPixSize
	GetStringPixSize

Colapse ALL

Expand ALL

Função: GetStringPixSize

Retorna uma matriz com a altura e a largura total em pixels de uma determinada string, dados uma fonte específica, tamanho e modificadores (negrito, itálico, sublinhado).

Sintaxe

GetStringPixSize ( <cString>, < cFontName>, < nTamanho>, [ lBold], [ lItalic], [ lUnderline] ) --> aRet

Parâmetros/Elementos

Nome	Tipo	Descrição	Obrigatório	Referência
cString	Caracter	String com o texto a ser contado (altura e largura).	X
cFontName	Caracter	Indica o nome da fonte instalada no Smart Client.	X
nTamanho	Numérico	Indica o tamanho da fonte.	X
lBold	Lógico	Indica se a fonte está em negrito.
lItalic	Lógico	Indica se a fonte está em itálico.
lUnderline	Lógico	Indica se a fonte está sublinhada.

Retorno

aRet

Retorna a altura e a lagura total em pixels, dos caracteres fornecidos em cString.

Observações

Utilize esta função somente nos programas executados através do Smart Client.
Os parâmetros de formatação (lBold, lItalic e lUnderline) tem como padrão o valor falso (.F.)

Importante
Função disponível, na linguagem AdvPL, a partir da build 7.00.060322A.

Bloco de código

language	cpp
theme	Eclipse
title	Exemplo

#INCLUDE "TOTVS.CH"
 
User Function ExPixString()
    // Declarações
	Local cFont
	Local aPixString
	Local cStringTeste
	
	// Inicializações
	cFont := "Arial"
	cMensagem := ""
	cStringTeste := "String de Teste" // Largura em pixels para Arial 12 normal => Altura: 19 Largura: 106
 
    //+----------------------------------------------------------------------------+
    //|Testa a função GetStringPixSize(...) 
    //+----------------------------------------------------------------------------+
    aPixString := GetStringPixSize(cStringTeste, cFont, 12) 				// Altura: 19 - Largura: 106
    conout("[GetStringPixSize] => Altura  => " + cValToChar(aPixString[1]))
    conout("[GetStringPixSize] => Largura[A] => " + cValToChar(aPixString[2]))
    
    aPixString := GetStringPixSize(cStringTeste, cFont, 12, .T.) 			// Altura: 20 - Largura: 115
    conout("[GetStringPixSize] => Altura  => " + cValToChar(aPixString[1]))
    conout("[GetStringPixSize] => Largura[B] => " + cValToChar(aPixString[2]))
    
    aPixString := GetStringPixSize(cStringTeste, cFont, 12, .F., .T.) 		// Altura: 20 - Largura: 108
    conout("[GetStringPixSize] => Altura  => " + cValToChar(aPixString[1]))
    conout("[GetStringPixSize] => Largura[C] => " + cValToChar(aPixString[2]))
    
    aPixString := GetStringPixSize(cStringTeste, cFont, 12, .F. , .F. , .T.) // Altura: 19 - Largura: 106
    conout("[GetStringPixSize] => Altura  => " + cValToChar(aPixString[1]))
    conout("[GetStringPixSize] => Largura[D] => " + cValToChar(aPixString[2]))
    
Return

Abrangência

Microsiga Protheus 12 , TOTVS Application Server 12 , ByYou Application Server

Árvore de páginas

Versões comparadas

Versão antiga 1

Nova versão 2

Chave

Função: GetStringPixSize