Esse exemplo mostra como criar uma classe oop e usar mais de uma vez uma variavel na mesma janela em ojetos diferentes.

ESSE EXEMPLO NAO PRECISA CRIAR DIVERSAS VARIAIVEIS E NEM VARIAVEIS GLOBAIS

A VARIAVEL É REAPROVEITADA EM CADA INSTANCIA DE CADA OBJETO


exemplo de codigo

//------------------OPEN WINDOW

obj2 is Class_Oop_Crud //criou o objeto // carimbo

ArrayAdd(obj2:m_painelcontrole) //+1

obj2.m_painelcontrole[1].gs_NomeJanela = "Paul"


//---------------------- BOTAO
Info(obj1.m_painelcontrole[1].gs_NomeJanela)

//----------------------- BOTAO
Info(obj2.m_painelcontrole[1].gs_NomeJanela)

//-----------------------------------------------------------------------------------CLASSE
Class_Oop_Crud is Class

m_painelcontrole is array of st_painelcontrole

END

st_painelcontrole is Structure

gs_UUID is UUID
gn_ID is 8-byte int
gn_ID_Atual is 8-byte int
gn_PlanoForm is 8-byte int
gn_PlanoBrowser is 8-byte int
gb_Status is boolean
gb_debug is boolean
gb_lockRec is boolean
gb_DuploClick is boolean
gs_acao is string
gs_TableFile is string
gs_CampoChave is string
gs_CampoChaveUUID is string
gs_CampoBusca is string
gs_ListaCamposTabela is string
gs_NomeJanela is string
gs_NomeJanela_CtrlDestino is string
gs_TableGrid is string
gs_TableGrid_Coluna_ID is string
gs_TableGrid_Coluna_Name is string
gs_GrupoCampos is string
gs_BotaoAlterar is string
gs_CampoDestino is string
gs_TipoBusca is string
gs_JanusGrid is string
gs_imagem_lateral is string
gs_campo_mascara is string
gs_log_antes is string
gs_log_depois is string
gdt_lock_record_time is DateTime
gdt_unlock_record_time is DateTime

END