PC SOFT

GRUPOS DE DISCUSSÃO PROFISSIONAL
WINDEVWEBDEV e WINDEV Mobile

Inicio → WINDEV 25 → Teria como fazer no meu programa para cliente cadastrado as configuracoes para alterar a fonte?
Teria como fazer no meu programa para cliente cadastrado as configuracoes para alterar a fonte?
Iniciado por Boller, jul., 24 2025 1:51 PM - Sem resposta
Membro registado
4.618 mensagems
Publicado em julho, 24 2025 - 1:51 PM
Sim seria assim:

Uma tabela tipo assim

t001_config
t001_descricao string
t001_valor memo
t001_status boolean
t001_DataHora_inicial datetime
t001_DataHora_final datetime

Hreadseek busca pela descrição da fonte que quer usar

Procedure GetConfig(Desc)

If Hreadseek(t001_config, t001_descricao, Desc) = true

Return t001_valor

Else

Info(“Config não encontrada”)

End




*Modo de usar*

MyFontTABLEGRID is Font
MyFontTABLEGRID.Name = GetConfig(“Fonte Tablegrid”)
MyFontTABLEGRID.Size = GetConfig(“Fonte Size Tablegrid”)
MyFontTABLEGRID.Bold = GetConfig(“Fonte Negrito Tablegrid”)

USA assim

TableXXXXX..font = MyFontTABLEGRID

--
Adriano José Boller
______________________________________________
Consultor e Representante Oficial da
PcSoft no Brasil
+55 (41) 99949 1800
adrianoboller@gmail.com
skype: adrianoboller
http://wxinformatica.com.br/