Utilizando a classe FWLayer, em uma janela que possui mais de uma Layer, estou com a dificuldade de saber quais as coordenadas finais (baixo e direita) onde termina a Layer, para utilizar nos parâmetros de coordenadas do MsSelect. Alguém sabe informar se existe alguma função que retorne essas coordenadas?
FwLayer com MsSelect
- Você vai ver essas setas em qualquer página de pergunta. Com elas, você pode dizer se uma pergunta ou uma resposta foram relevantes ou não.
- Edite sua pergunta ou resposta caso queira alterar ou adicionar detalhes.
- Caso haja alguma dúvida sobre a pergunta, adicione um comentário. O espaço de respostas deve ser utilizado apenas para responder a pergunta.
- Se o autor da pergunta marcar uma resposta como solucionada, esta marca aparecerá.
- Clique aqui para mais detalhes sobre o funcionamento do TOTVS DevForum!
2 respostas
-
Para o Layer inteiro (principal) eu uso o oSizeDlg:aWindSize. para as outras janelas dentro do layer, tem que ser "na mão" mesmo. veja se o exemplo a baixo ajuda.
oDlgTst := MsDialog():New(oSizeDlg:aWindSize[1], oSizeDlg:aWindSize[2], oSizeDlg:aWindSize[3], oSizeDlg:aWindSize[4], "Tela inteira do FwLayer",,,,,,,,, .T.)
//Inicializa o FWLayer
oLayer:Init(oDlgTst,.F.,.T.)
//Cria as colunas do Layer
oLayer:addCollumn('Col01',20,.F.) oLayer:addCollumn('Col02',20,.F.)
//Adiciona Janelas as colunas
oLayer:addWindow('Col01','C1_Win01','Janela 01',60,.T.,.F.,{|| Alert("janela 01 Coluna 1!") },,{|| Alert("Janela 01, Coluna 1!") })
-
Foi o que pensei. Fazendo "na mão" tem o problema de abrir em outro tipo de monitor, ficar os objetos montados.
— Adriano Moreira 15 de Jan de 2020
-
-
Boa noite, Adriano!
Verifique se o exemplo abaixo lhe ajuda.
oLayer:AddLine('LIN1', 100, .F.) oLayer:AddCollumn('COL1', 100, .T., 'LIN1') oLayer:AddWindow('COL1', 'BROWSE', cTitle, 100, .F. ,.T.,, 'LIN1', { || }) oPanel := oLayer:GetWinPanel('COL1', 'BROWSE', 'LIN1')O método GetWinPanel da classe FwLayer retorna um objeto da classe TPanel, de acordo com a janela da layer no qual você selecionou.
Através do objeto TPanel, é possível conseguir as coordenadas daquele painel em específico. Por exemplo:
nAltura := oPanel:nHeight nLargura := oPanel:nWidth-
Bom dia. Já tinha tentado dessa forma e não fica exatamente no local exato, respeitando os limites do Layer. Ele ultrapassa as coordenadas da direita e da parte de baixo do Layer.
— Adriano Moreira 15 de Jan de 2020
-
