Estou fazendo uma tela usando o FwLayer e precisava que a janela Grupo se estendesse até a Janela Status.
E Não estou conseguindo, seria possível ?
Anexo tela para visualização.
Obrigado.
#include "protheus.ch"
User Function Layer()
Local oDlgPrinc
Define MsDialog oDlgPrinc Title 'Teste' From aCoors[1], aCoors[2] To aCoors[3], aCoors[4] Pixel
oFWLayer := FWLayer():New()
oFWLayer:init(oDlgPrinc )
oFWLayer:addCollumn( "Col01", 20, .T. )
oFWLayer:addWindow( "Col01", "Win01", 'Entidade', 99.9, .F., .T., {|| },,)
oWin01 := oFWLayer:getWinPanel('Col01','Win01')
oFWLayer:addCollumn( "Col02", 26, .F. )
oFWLayer:addWindow( "Col02", "Win02", 'Detalhes',45, .T., .T., {||},,) //"Detalhes"
oWin02 := oFWLayer:getWinPanel('Col02','Win02')
oFWLayer:addWindow( "Col02", "Win03", 'Grupos', 23, .T., .F., {||/* */},,)
oWin03 := oFWLayer:getWinPanel('Col02','Win03')
oFWLayer:addWindow("Col02", "Win04", 'Cadastros', 32, .F., .F.,{||},,) //"Cadastro"
oWin04 := oFWLayer:getWinPanel('Col02','Win04')
oWin04:Align:= CONTROL_ALIGN_ALLCLIENT
oFWLayer:addCollumn( "Col03",27, .T. )
oFWLayer:addWindow( "Col03", "Win05", 'Entidade', 45, .F., .T., {|| },,) //"Entidade"
oWin05 := oFWLayer:getWinPanel('Col03','Win05')
oFWLayer:addCollumn( "Col04",27, .T. )
oFWLayer:addWindow( "Col04", "Win06", 'Status', 45, .F., .T., {|| },,) //"Status"
oWin06 := oFWLayer:getWinPanel('Col04','Win06')
Activate MsDialog oDlgPrinc Centered
return