Download Creating Forms

Transcript
O código de evento Click do segundo botão de comando do formulário frmRight demonstra a
definição de uma propriedade de um formulário a partir de um objeto no formulário:
THISFORM.Caption = ;
ALLTRIM(ThisFormSet.frmLeft.txtInput.Value)
Se o usuário clicar sobre este botão, a legenda do formulário frmRight será alterada de acordo com
o valor que estiver na caixa de texto do formulário frmLeft.
Acessando objetos em formulários diferentes
O código a seguir no evento Click do botão de comando Alterar a definição de negrito altera o valor
da caixa de verificação Negrito no formulário frmLeft e chama o código de evento associado a esse
controle.
THISFORMSET.frmLeft.chkBold.Value = ;
NOT THISFORMSET.frmLeft.chkBold.Value
THISFORMSET.frmLeft.chkBold.InteractiveChange
A última linha do exemplo chama o evento InteractiveChange de chkBold. Você poderia também
chamar esse procedimento com o comando a seguir:
THISFORMSET.frmForm1.chkBold.InteractiveChange( )
Se essa chamada de procedimento for omitida, o valor da caixa de verificação será alterado, mas a
propriedade FontBold da caixa de texto nunca será alterada.
O usuário clica sobre o botão de comando Alterar a definição de negrito no formulário à direita