@ Get com problema

[cendon]

Boa Noite pessoal

Será que algum adepto ao @ SAY sabe o motivo do problema abaixo

tenho uma rotina com um GET de uma UF só que quando tento entrar com letra maiores, Ex: MG só o M aparece apesar da variavel do get estar com MG, se eu entro 2 letras menores tipo IF ou II o get mostra as duas letras

a rotina esta abaixo

mclicid=space(25)

mcliest=space(2)

mclibai=space(25)

mmes =space(2)

mdia =space(2)

mgrupo =space(30)

mok="S"

nNivel=1

DEFINE DIALOG oDlg5 FROM 5, 1 TO 22, 50 ;

TITLE "Filtro"

@ 1 , 2 SAY "Cidade:" OF oDlg5

@ 1 , 6 GET oclicid VAR mclicid OF oDlg5 pict "@!"

@ 2 , 2 SAY "Bairro:" OF oDlg5

@ 2.2, 6 GET oclibai VAR mclibai OF oDlg5 pict "@!"

@ 3 , 2 SAY "Estado:" OF oDlg5

@ 3.3, 6 GET ocliest VAR mcliest OF oDlg5 pict "@!"

@ 4 , 2 SAY "Nascimento - Mes:" OF oDlg5

@ 4.6, 8 GET omes VAR mmes OF oDlg5 pict "99"

@ 4 ,14 SAY "Dia:" OF oDlg5

@ 4.6,13 GET odia VAR mdia OF oDlg5 pict "99"

@ 5 , 2 SAY "Grupo:" OF oDlg5

@ 5.8, 6 GET ogrupo VAR mgrupo OF oDlg5 pict "@!"

@ 6 , 2 BUTTON "&OK" OF oDlg5 SIZE 50, 12 ACTION oDlg5:End()

@ 6 ,12 BUTTON "&Cancelar" OF oDlg5 SIZE 50, 12 ACTION (mok:="N",oDlg5:End())

ACTIVATE DIALOG oDlg5 CENTERED

se algum dos experts em @ SAY/GET souber o porque, por favor me ajudem.

Angelo Cendon

cendon.angelo@gmail.com

Belo Horizonte-MG

Fivewin-Harbour-@ l,c Workshop

[cendon]

Boa Noite pessoal

Será que algum adepto ao @ SAY sabe o motivo do problema abaixo

tenho uma rotina com um GET de uma UF só que quando tento entrar com letra maiores, Ex: MG só o M aparece apesar da variavel do get estar com MG, se eu entro 2 letras menores tipo IF ou II o get mostra as duas letras

a rotina esta abaixo

mclicid=space(25)

mcliest=space(2)

mclibai=space(25)

mmes =space(2)

mdia =space(2)

mgrupo =space(30)

mok="S"

nNivel=1

DEFINE DIALOG oDlg5 FROM 5, 1 TO 22, 50 ;

TITLE "Filtro"

@ 1 , 2 SAY "Cidade:" OF oDlg5

@ 1 , 6 GET oclicid VAR mclicid OF oDlg5 pict "@!"

@ 2 , 2 SAY "Bairro:" OF oDlg5

@ 2.2, 6 GET oclibai VAR mclibai OF oDlg5 pict "@!"

@ 3 , 2 SAY "Estado:" OF oDlg5

@ 3.3, 6 GET ocliest VAR mcliest OF oDlg5 pict "@!"

@ 4 , 2 SAY "Nascimento - Mes:" OF oDlg5

@ 4.6, 8 GET omes VAR mmes OF oDlg5 pict "99"

@ 4 ,14 SAY "Dia:" OF oDlg5

@ 4.6,13 GET odia VAR mdia OF oDlg5 pict "99"

@ 5 , 2 SAY "Grupo:" OF oDlg5

@ 5.8, 6 GET ogrupo VAR mgrupo OF oDlg5 pict "@!"

@ 6 , 2 BUTTON "&OK" OF oDlg5 SIZE 50, 12 ACTION oDlg5:End()

@ 6 ,12 BUTTON "&Cancelar" OF oDlg5 SIZE 50, 12 ACTION (mok:="N",oDlg5:End())

ACTIVATE DIALOG oDlg5 CENTERED

se algum dos experts em @ SAY/GET souber o porque, por favor me ajudem.

Angelo Cendon

cendon.angelo@gmail.com

Belo Horizonte-MG

Fivewin-Harbour-@ l,c Workshop

[cendon]

Boa Noite pessoal

Será que algum adepto ao @ SAY sabe o motivo do problema abaixo

tenho uma rotina com um GET de uma UF só que quando tento entrar com letra maiores, Ex: MG só o M aparece apesar da variavel do get estar com MG, se eu entro 2 letras menores tipo IF ou II o get mostra as duas letras

a rotina esta abaixo

mclicid=space(25)

mcliest=space(2)

mclibai=space(25)

mmes =space(2)

mdia =space(2)

mgrupo =space(30)

mok="S"

nNivel=1

DEFINE DIALOG oDlg5 FROM 5, 1 TO 22, 50 ;

TITLE "Filtro"

@ 1 , 2 SAY "Cidade:" OF oDlg5

@ 1 , 6 GET oclicid VAR mclicid OF oDlg5 pict "@!"

@ 2 , 2 SAY "Bairro:" OF oDlg5

@ 2.2, 6 GET oclibai VAR mclibai OF oDlg5 pict "@!"

@ 3 , 2 SAY "Estado:" OF oDlg5

@ 3.3, 6 GET ocliest VAR mcliest OF oDlg5 pict "@!"

@ 4 , 2 SAY "Nascimento - Mes:" OF oDlg5

@ 4.6, 8 GET omes VAR mmes OF oDlg5 pict "99"

@ 4 ,14 SAY "Dia:" OF oDlg5

@ 4.6,13 GET odia VAR mdia OF oDlg5 pict "99"

@ 5 , 2 SAY "Grupo:" OF oDlg5

@ 5.8, 6 GET ogrupo VAR mgrupo OF oDlg5 pict "@!"

@ 6 , 2 BUTTON "&OK" OF oDlg5 SIZE 50, 12 ACTION oDlg5:End()

@ 6 ,12 BUTTON "&Cancelar" OF oDlg5 SIZE 50, 12 ACTION (mok:="N",oDlg5:End())

ACTIVATE DIALOG oDlg5 CENTERED

se algum dos experts em @ SAY/GET souber o porque, por favor me ajudem.

Angelo Cendon

cendon.angelo@gmail.com

Belo Horizonte-MG

Fivewin-Harbour-@ l,c Workshop

[gunafe]

Angelo,

Use na sua linha de comando a clausula SIZE que o seu problema va se resolver, veja exemplo:

@ 1 , 6 GET oclicid VAR mclicid OF oDlg5 SIZE 100,10 pict "@!"

onde 100 = largura e 10 = Altura

faça isso em todos os SAYS e GETS que vai mostrar corretamente.

[]´s

Luiz Augusto

São José dos Pinhais - PR

Harbour43 + Five2.4 + Verce

[cendon]

Obrigado Luiz Funcionou 100%

Angelo Cendon

cendon.angelo@gmail.com

Belo Horizonte-MG

Fivewin-Harbour-@ l,c Workshop