O que tem errado nesta rotina?

[pena]

Bom dia, ao executar a rotina da o seguinte erro

Código: Selecionar todos

   @ Lpg+040,490 COMBOBOX T_fisica              ;
                 WIDTH 100                      ;
                 ITEMS { 'F-Fisica' , 'J-Jurídica'} ;
                 VALUE cFisica                  ;
                 FONT 'Arial' SIZE 09           ;
                 FONTCOLOR BLACK BOLD           ;           
                 ON CHANGE {|| MudaMascara(this.value)};

Func MudaMascara(opc)
   SetProperty( "Form_Vendedor", "T_Cnpj", "Picture",if(opc=1,"@R 999.999.999-99","@R 99.999.999/9999-99"))
DoMethod("Form_Vendedor","T_Cnpj","SetFocus")
Return Nil

Error BASE/1070 Erro nos parametros: ==

[HASA]

:-O
Olá Pena, normalmente "Picture" é para mostra uma imagem, não é ai o erro ?

:%
HASA

[Toledo]

Pena, na propriedade VALUE de um ComboBox você tem que passar um valor numérico, então teria que ver como você declarou a variável cFisica. Geralmente, não obrigatoriamente, quando colocamos no início do nome de uma variável a letra c, isto quer dizer que seja uma variável Caractere (string).

Bom, no caso do "picture", observado pelo Hasa, se for de um controle GETBOX, então não vai ter problema algum, provavelmente vai funcionar alterando a mascara do GetBox.

Abraços,

[pena]

Hasa, copiei esta rotina aqui no forum mesmo, pra testar, mas acho que é picture de mascara mesmo e nao de figura.
Toledo vou ver como esta declarado a variavel.

[pena]

Mas espera ae, ele vai entrar nessa rotina, quando eu clicar?
Porque ja tenho outros testes com este campo e funcionando
ex:

Código: Selecionar todos

   if Form_Vendedor.T_Fisica.Value = 2 .and. Empty(SUBS(Form_Vendedor.T_Cnpj.Value,1,1))
      MsgSTOP("Informe o Cnpj","Vendedores")
      Form_Vendedor.T_Cnpj.Setfocus
      Return .f.
   Endif

[pena]

Acho que entendi o que o Hasa quis dizer, talvez no Getbox picture seja mascara, mas no textbox não, vou ver se descubro com seria o nome

[HASA]

Pena, faz o seguinte, crie um pequeno demo.prg e posta ae, que a gente ajeita ele pro C++ ( Kkkk )
HASA
:)Pos

[pena]

mudei pra getbox, e esta funcionando blz, obrigado pela atenção

[HASA]

:|<
ok