|
| Inicio → WINDEV 25 → WX - Deixar o campo atual em cor evidente na tela para o usuario localizar rapido o campo atual(AlteraCorFocusStyle) |
| WX - Deixar o campo atual em cor evidente na tela para o usuario localizar rapido o campo atual(AlteraCorFocusStyle) |
| Iniciado por Boller, 23,feb. 2021 12:32 - 1 respuesta |
| |
| | | |
|
| |
Miembro registrado
4.549 mensajes |
|
| Publicado el 23,febrero 2021 - 12:32 |
Prezados
Para deixar o campo atual em cor evidente na tela para o usuario localizar rapido o campo atual, abaixo exemplificamos como fazer isso:
Procedure AlteraCorFocusStyle(pGrupo, pModo = True)
sCampo_ is string
FOR i = 1 TO pGrupo..Occurrence
sCampo_ = EnumControl(pGrupo,i,byTabOrder)
Trace({sCampo_,indControl}..Type,{sCampo_,indControl}..Name,pModo )
IF {sCampo_,indControl}..Type = 10001 OR {sCampo_,indControl}..Type = 10002 OR {sCampo_,indControl}..Type = 20001 OR {sCampo_,indControl}..Type = 20004 OR {sCampo_,indControl}..Type = 20003 THEN
IF pModo THEN
{sCampo_,indControl}..BrushColor = gnCorObrigatorio
Trace({sCampo_,indControl}..Type,{sCampo_,indControl}..Name,pModo )
ELSE
{sCampo_,indControl}..BrushColor = gnCorNormal
END
END
END
--
Adriano José Boller
______________________________________________
Consultor e Representante Oficial da
PcSoft no Brasil
+55 (41) 99949 1800
adrianoboller@gmail.com
skype: adrianoboller
http://wxinformatica.com.br/ |
| |
| |
| | | |
|
| | |
| |
Miembro registrado
4.549 mensajes |
|
| Publicado el 23,febrero 2021 - 13:57 |
OBS.:
Colocar em um grupo e informar nessa procedure global o grupo ao abrir a janela.
Procedure MyWindow( )
AlteraCorFocusStyle(GR_Campos)
--
Adriano José Boller
______________________________________________
Consultor e Representante Oficial da
PcSoft no Brasil
+55 (41) 99949 1800
adrianoboller@gmail.com
skype: adrianoboller
http://wxinformatica.com.br/ |
| |
| |
| | | |
|
| | | | |
| | |
|