Habilitar a Partir da Opção comboboxex

Projeto MiniGui - Biblioteca visual para Harbour/xHarbour

Moderador: Moderadores

Avatar do usuário
Marcos
Usuário Nível 3
Usuário Nível 3
Mensagens: 355
Registrado em: 20 Set 2003 09:16
Localização: Cáceres/Mato Grosso

Habilitar a Partir da Opção comboboxex

Mensagem por Marcos »

Já esgotei meus poucos conhecimentos neste assunto, então resolvi pedir ajuda, porque acontece um erro neste processo:

Código: Selecionar todos

local x_tipo := 1
HabilitaDesabilita()
@ 050,475 comboboxex cbo_tipo;
			width 90;
			height 255;
			items aTipo value x_tipo
*-------------------------------------------------------------------------------
static function HabilitaDesabilita()
if form_dados.cbo_tipo.value = 1          //o erro acontece aqui-cbo_tipo Of form_dados Not defined.
	form_dados.lbl_005.visible := .f.
	form_dados.tbox_003.visible := .f.
endif
Minha necessidade seria Habilitar ou Desabilitar Campos (Label, Textbox) conforme o usuário escolher alguma opção no Combobox, sabem porque o erro ?
Atenciosamente,
_____________________________
Marcos Antonio da Silva
marcosilva90@hotmail.com
Avatar do usuário
Toledo
Administrador
Administrador
Mensagens: 3133
Registrado em: 22 Jul 2003 18:39
Localização: Araçatuba - SP
Contato:

Habilitar a Partir da Opção comboboxex

Mensagem por Toledo »

Amigo, tente o seguinte:

Código: Selecionar todos

local x_tipo := 1
@ 050,475 comboboxex cbo_tipo;
         width 90;
         height 255;
         items aTipo value x_tipo ON CHANGE HabilitaDesabilita()
Abraços
Toledo - Clipper On Line
toledo@pctoledo.com.br
Harbour 3.2/MiniGui/HwGui
Faça uma doação para o fórum, clique neste link: http://www.pctoledo.com.br/doacao
Avatar do usuário
Marcos
Usuário Nível 3
Usuário Nível 3
Mensagens: 355
Registrado em: 20 Set 2003 09:16
Localização: Cáceres/Mato Grosso

Habilitar a Partir da Opção comboboxex

Mensagem por Marcos »

Na mosca como sempre Toledo, obrigado pela ajuda.
Atenciosamente,
_____________________________
Marcos Antonio da Silva
marcosilva90@hotmail.com
Responder