PV Add font

4D View v15

PV Add font


PV Add font ( area ; nome ) -> Resultado

Parâmetro	Tipo	Descrição
area	Inteiro longo	Área 4D View
nome	String	Nome da fonte
Resultado	Inteiro longo	Número da fonte

Descrição

O comando PV Add font associa a fonte nome a area e devolve sua identificação única.

Se nome já existe, o comando PV Add font devolve seu identificador (o número também pode ser obtido utilizando o comando PV GET FONT LIST).

Para maior informação sobre o funcionamento das fontes associadas a uma área 4D View, consulte a seção PV Estilo, Introdução.

Exemplo

Este método funciona em comutação (switch): elimina uma fonte da área 4D View ou, pelo contrário, associa ela se foi eliminada anteriormente.

 C_TEXT($FontName) //Nome de fonte a adicionar/remover da Area

 

 ARRAY LONGINT($FontNumArray;0) //Array dos números de fontes

 ARRAY TEXT($FontNameArray;0) //Arrays dos nomes de fontes

 C_LONGINT($Position) //Posição da fonte nos arrays de números e nomes

 

 $FontName:="Arial"

 

 PV GET FONT LIST(Area;$FontNumArray;$FontNameArray) //Lista de fontes disponíveis

 $Position:=Find in array($FontNameArray;$FontName)

 

 If($Position=-1) //$FontName font está indisponível para a área?

    $Position:=Size of array($FontNameArray)+1 //Agregar

    INSERT IN ARRAY($FontNameArray;$Position) //Redimensionar...

    INSERT IN ARRAY($FontNumArray;$Position) //...arrays

    $FontNameArray{$Position}:=$FontName  //Atribuir nome da nova fonte

    $FontNumArray{$Position}:=PV Add font(Area;$FontName) //Atribui número da fonte

 

 Else //$FontName fonte já está presente na área

    PV REMOVE FONT(Area;$FontNumArray{$Position}) //Remover

 End if

Ver também

PV GET FONT LIST
PV REMOVE FONT