CalcFieldSize

Função: CalcFieldSize

Calcula o tamanho em pixel da área ocupada pelo objeto TSay/TGet na área de edição.

CalcFieldSize ( [ cTipo], [ nTaman], [ nDecimal], [ cPicture], [ cTitulo], [ oFont] ) --> nTamCampo

Nome	Tipo	Descrição	Obrigatório	Referência
cTipo	Caracter	Indica o tipo do campo.
nTaman	Numérico	Indica o tamanho do campo.
nDecimal	Numérico	Indica o número de casas decimais.
cPicture	Caracter	Indica a picture do campo.
cTitulo	Caracter	Indica o título do campo.
oFont	Objeto	Objeto do tipo TFont, que se preenchido fará o calculo da largura baseado na fonte definida. Importante: Esta opção utilizará o SmartClient para calculo da dimensão do texto, desta forma, não estará disponível para execuções via JOB ou Schedule. É importante ressaltar também que esta opção deve ser executada com cautela, devido ao trafego de rede necessário para transporte da informação necessária ao cálculo. Observação: Parâmetro disponível em versões superiores à 120420A.

nTamCampo

Retorna o tamanho em pixel da área ocupada pelo objeto TSay/TGet na área de edição.

DbSelectArea("SX3")
Dbsetorder(2)DbSeek("A1_NOME")
nFieldSize := CalcFieldSize(X3_TIPO,X3_TAMANHO,X3_DECIMAL,alltrim(X3_PICTURE),X3Titulo())

Microsiga Protheus 8.11 , TOTVS Application Server 10 , ByYou Application Server