Windev - Desabilitar Campos Para Consulta

VIDEO - DESABILITAR CAMPOS PARA CONSULTA

---

---

---

SWITCH gnTipo_formulario
    CASE 4  // se for Consulta
        MyWindow..Title="Consulta"
        i is int = 1
        _controle is string
        _controle = EnumControl(MyWindow,i)
        WHILE _controle<>""
            i++
            {_controle}..State = Grayed
            _controle=EnumControl(MyWindow,i)
        END
        BTN_Validate..Visible=Grayed
        BTN_Cancel..State=Active
        BTN_Cancel..Caption="Encerra"
    OTHER CASE
       
END