Array
(
)

Desabilita DBEdit

Klaveren
   - 31 ago 2004

Pessoal estou com um pequeno problema será que alguem poderia me dar uma mãozinha???

segue:

:arrow: Tenho uma tabela (TABLE1), esta possui 3 campos (TIPOCADASTRO, CPF , CNPJ, EMPRESA, NOME)
:arrow: Bem tenho um FORM com os seguintes componentes: (DBCOMBOBOX_TIPOCADASTRO, DBEDIT_CPF, DBEDIT_CNPJ, DBEDIT_EMPRESA, DBEDIT_NOME),
:arrow: O DBCOMBOBOX tem duas opções ( PESSOA FISICA e PESSOA JURIDICA)

:arrow: Gostaria de fazer a seguinte mecanica... Quando seleciono PESSOA FISICA Desabilita o DBEDIT_EMPRESA e o DBEDIT_CNPJ, da mesma forma se selecionar PESSOA JURIDICA desabilita os DBEDITS DBEDIT_NOME e o DBEDIT_CPF.

:arrow: Utilizei o seguinte código porem sem sucesso:

#Código

begin
if DBCOMBOBOX_TIPOCADASTRO = ´PESSOA FISICA´ then
DBEDIT_EMPRESA.ENABLED = FALSE and
DBEDIT_CNPJ.ENABLED = FALSE Else
DBEDIT_NOME.ENABLED = FALSE and
DBEDIT_CPF.ENABLED = FALSE
end;


Alguem tem outra sintaxe pra me ajudar...
Obrigado.


Sandra
   - 31 ago 2004

klaveren,

Faça assim:

#Código

begin 
if DBCOMBOBOX_TIPOCADASTRO = ´PESSOA FISICA´ then begin
DBEDIT_EMPRESA.Enabled := False;
DBEDIT_CNPJ.Enabled := False;
end else begin
DBEDIT_NOME.Enabled := False;
DBEDIT_CPF.Enabled := False;
end;
end;