quarta-feira, 7 de junho de 2017

Alinhamento em janelas com a propriedade do ALIGN

Quem nunca sofreu com alinhamentos em janelas do Protheus, porém um simples comando vai fazer você mudar o seu conceito em relação a esse assunto,  esse é a propriedade ALIGNque vai nos esquecer as complexos malabarismos de coordenadas do MsAdvSize ou FWGetDialogSize.
Então vamos lá com as opções:

Alinhar preenchendo em todo o conteúdo da Janela ou Painel onde estiver
CONTROL_ALIGN_ALLCLIENT
Alinhar ao Topo
CONTROL_ALIGN_TOP 
Alinhar ao Rodapé
CONTROL_ALIGN_BOTTOM
Alinhar à Esquerda
CONTROL_ALIGN_LEFT
Alinha à Direita
CONTROL_ALIGN_RIGHT
Não utiliza alinhamento
CONTROL_ALIGN_NONE 

Vale ressaltar que o exemplo foi reduzido apenas, para que fosse demostrado o uso dos ALIGN, e o uso deverá ser adaptado de acordo coma sua necessidade.














Um detalhe importante que nesse exemplo até utilizei coordenadas, porém se tivesse deixado o MSNewGetDados  com os campos zerados o resultado seria o mesmo.

oMSNewGet := MsNewGetDados():New( 0,0,0,0, nOpc,  "U_VLDLINHA()" , "AllwaysTrue", "",;
aAltFields,, nCont , "AllwaysTrue", "", "AllwaysTrue", oWin02, aHeaderEx, aColsEx)
oMSNewGet:oBrowse:Align := CONTROL_ALIGN_ALLCLIENT

Boa sorte na nova forma de alinhamentos sem uso de coordenadas.

Nenhum comentário: