Versão atual:

Popular addWindow com dados em Array

Boa tarde!

Estou montando uma tela com FWLayer para apresentar algo parecido com o "Consulta posição de cliente", mas não sei como popular cada "addWindow" conforme código abaixo. Alguém poderia me ajudar, por favor? Obrigado!

include "protheus.ch"

User Function ExLayer1()

Local oDlg as object

Local oLayer as object

oLayer := FWLayer():new()

DEFINE MSDIALOG oDlg FROM 000,000 TO 350,650 PIXEL TITLE "Informações Comerciais"

//Inicializa o FWLayer com a janela que ele pertencera e se sera exibido o botão de fechar

oLayer:init(oDlg,.T.)

//Cria as colunas do Layer

oLayer:addCollumn('Col01',33,.F.)

oLayer:addCollumn('Col02',33,.F.)

oLayer:addCollumn('Col03',33,.F.)

//Adiciona Janelas as colunas

oLayer:addWindow('Col01','C1_Win01','Primeira compra',33,.F.,.F.,,,)

oLayer:addWindow('Col01','C1_Win02','Ultima compra' ,33,.F.,.F.,,,)

oLayer:addWindow('Col02','C2_Win01','Maior acumulo' ,33,.F.,.F.,,,)

oLayer:addWindow('Col02','C2_Win02','A vencer' ,33,.F.,.F.,,,)

oLayer:addWindow('Col03','C2_Win01','Vencido' ,33,.F.,.F.,,,)

oLayer:addWindow('Col03','C2_Win02','Conceito' ,33,.F.,.F.,,,)

oLayer:getWinPanel('Col02','C2_Win01')

ACTIVATE MSDIALOG oDlg CENTERED

Return

Versão (1):

Ver a versão formatada

Popular addWindow com dados em Array

Comentário

new question