Página 1 de 1

Criar GETs em Tempo de Execução

Enviado: 09 Set 2008 17:12
por gralak
Ai galera não sei se alguém já precisou fazer isso mas como eu faço pra criar os GETs em tempo de execução ???? :(Neg

Re: Criar GETs em Tempo de Execução

Enviado: 09 Set 2008 18:19
por Toledo
Gralak, eu não uso HwGui, mas acho que isto pode dar certo...

Código: Selecionar todos

// {Nome,Coluna,linha}
Priv aLabels:={{"Código",2,60},;
               {"Nome do Cliente",2,100},;
               {"Telefone",2,140}}


// {Nome,Variavel,Coluna,Linha,tamanho,mascara}
Priv aCampos:={{"Get_Codigo","oCodigo",60,60,50,"99999"},;
               {"Get_Nome","oNome",60,100,200,REPL("X",40)},;
               {"Get_Telefone","oTelefone",60,140,80,REPL("X",15)}}


FOR i=1 TO LEN(aLabels)
 @ aLabels[i,2], aLabels[i,3] Say aLabels[i,1]  SIZE 40,20
NEXT

FOR i=1 TO LEN(aCampos)
 @ aCampos[i,3], aCampos[i,4] Get aCampos[i,1] VAR aCampos[i,2] PICTURE aCampos[i,6] SIZE aCampos[i,5], 20
NEXT
Tenho alguma coisa semelhante com MiniGui e funciona certinho... faz um teste ai!

Ah! Eu não testei, ok?

Abraços,

Re: Criar GETs em Tempo de Execução

Enviado: 10 Set 2008 09:26
por gralak
Agora só uma duvida Como eu faço pra deletar ou deixar invisivel esses GETs já criados ???? :-Y :-Y

Re: Criar GETs em Tempo de Execução

Enviado: 10 Set 2008 13:01
por Toledo
Gralak, não entendi direito o que você quis dizer em "deletar ou deixar invisível", mas para desabilitar um GET existente e não permitir sua edição, você pode fazer o seguinte:

Para desabilitar o GET Get_Telefone do meu exemplo acima:

Código: Selecionar todos

Get_Telefone:disable()
Abraços,

Re: Criar GETs em Tempo de Execução

Enviado: 10 Set 2008 17:26
por gralak
Caro amigo MODERADOR TOLEDO
A questão é que eu tenho que fazer aparecer os GETs e depois faze-los sumir da tela ????
Espero ter clariado a minha duvida ....

Aguardo Resposta ... :-Y :-Y

Re: Criar GETs em Tempo de Execução

Enviado: 10 Set 2008 22:50
por esbasso
meu caro Gralak

oGet:hide() && sumir
oGet:show() && aparecer de volta
oGet:enable() && habilita
oGet:disble() && desabilita

Re: Criar GETs em Tempo de Execução

Enviado: 11 Set 2008 11:03
por gralak
Agora sim em aahhahahaahhaha
vlw mesmo té +++++++++++ :-Y :-Y :-Y :-Y :-Y :-Y :)´ :)´ :)´ X:) X:) X:) X:)