× Linguagem de Programação ADVPL

Perguntas Desativar campo com radio button

Mais
10 anos 11 meses atrás #19035 por marceloc
Bom dia,

Estou trabalhando numa tela com MsDialog, estou usando Radio Button(TRadMenu) para selecionar uma opção para efetuar um calculo onde digito informações num campo TGet. Blz até ai funcional.
O problema está em:
- Ao acessar a rotina antes de selecionar uma opção os campos deveriam estar desabilitados, e somente habilitar um campo para digitar informações ao selecionar uma opção do Radio Button.

Como poderia fazer isso? Conheço muito pouco de Radio Button.

Desde já agradeço.

Por favor Acessar ou Registrar para participar da conversa.

Mais
10 anos 11 meses atrás #19044 por lalberto
Respondido por lalberto no tópico Desativar campo com radio button
Marcelo por favor, coloca o codigo ai pra gente dar uma olhada.

Geralmente é assim, pelo mesmo com checkbox

_oCheckBox:Disable() // Desabilita CheckBox
_oCheckBox:Enable() // Habilita Checkbox

Luiz Alberto Vieira Alves
Proprietário
55 (12) 9 8256-5905 (Vivo)
www.3lsystems.com.br
www.masteradvpl.com.br

Por favor Acessar ou Registrar para participar da conversa.

Mais
10 anos 11 meses atrás #19049 por marceloc
Respondido por marceloc no tópico Desativar campo com radio button
oRadio := tRadMenu():New(33,05,aOptions,{|u|if(PCount()>0,nRadio:=u,nRadio)},oPnlGrid,,,,,,,,100,20,,,,.T.)

oPeso := TGet():New( 30,65,{|u| If(PCount()>0,nPeso:=u,nPeso)},oPnlGrid,060,008,'@R 999,999.99',,CLR_BLACK,CLR_WHITE,,,,.T.,"",,,.F.,.F.,,.F.,.F.,"","nPeso",,)
oKm := TGet():New( 41,65,{|u| If(PCount()>0,nKm:=u,nKm)},oPnlGrid,067,008,'@R 999,999.99',,CLR_BLACK,CLR_WHITE,,,,.T.,"",,,.F.,.F.,,.F.,.F.,"ZP0","nKm",,)
oPreco := TGet():New( 52,65,{|u| If(PCount()>0,nPreco:=u,nPreco)},oPnlGrid,060,008,'@R 999,999.99',,CLR_BLACK,CLR_WHITE,,,,.T.,"",,,.F.,.F.,,.F.,.F.,"","nPreco",,)

Os campos nPeso, nKm, nPreco são campos digitáveis, aí quando seleciono um radio button deveria habilitar um campo destes.
Hoje todos os campos estão habilitados.

Por favor Acessar ou Registrar para participar da conversa.

Mais
10 anos 11 meses atrás #19051 por lalberto
Respondido por lalberto no tópico Desativar campo com radio button
@ 20,10 RADIO aOpc VAR nRadCh Object oRadio

oRadio:bChange := {|| ChgCtrl(nRadCh,oGet3,oSay6)}

Static Function ChgCtrl(nRadCh,oGet,oSay)
If nRadCh == 1
oGet:lVisibleControl := .F.
oSay:lVisibleControl := .F.
elseif nRadCh == 2
oGet:lVisibleControl := .T.
oSay:lVisibleControl := .T.
Endif

Return Nil

Luiz Alberto Vieira Alves
Proprietário
55 (12) 9 8256-5905 (Vivo)
www.3lsystems.com.br
www.masteradvpl.com.br

Por favor Acessar ou Registrar para participar da conversa.

Mais
10 anos 11 meses atrás #19059 por marceloc
Respondido por marceloc no tópico Desativar campo com radio button
Luiz,

Obrigado pela ajuda, consegui fazer com o que vc me passou.

Abraço.

Por favor Acessar ou Registrar para participar da conversa.

Tempo para a criação da página:0.114 segundos
Joomla templates by a4joomla