Fórum Verificar um dbRadioGroup #324754
05/07/2006
0
Bom dia,estou precisando de uma ajudinha com dbradiogroup.O caso é
quero construir um form de Cadastro de Clientes que servisse como Pessoa Fisica e Juridica num mesmo form ex: Ao clicar em pessoa fisica mudaria o label e maskedit. E também ao clicar sobre o botão proximo ele tambem reconhecesse o campo. E também em qual evento usar para funcionar de acordo.Obrigado vitor5
quero construir um form de Cadastro de Clientes que servisse como Pessoa Fisica e Juridica num mesmo form ex: Ao clicar em pessoa fisica mudaria o label e maskedit. E também ao clicar sobre o botão proximo ele tambem reconhecesse o campo. E também em qual evento usar para funcionar de acordo.Obrigado vitor5
Vitor5
Curtir tópico
+ 0
Responder
Posts
05/07/2006
Adriano Santos
Aqui eu fiz a atualização de um label, mas vc pode fazer qq coisa.
[quote:c465863eb9=´Evento onClick do DbRadioGroup´]
[/quote:c465863eb9]
Pra atualizar a informação no banco de dados vc pode fazer de várias formas diferentes. Normalmente eu vinculo o DbRadioGroup ao campo da tabela e fazendo um IF para gravar o valor que eu quero, tipo:
[quote:c465863eb9=´Botão de gravação´]
[/quote:c465863eb9]
[quote:c465863eb9=´Evento onClick do DbRadioGroup´]
case DbRadioGroup1.ItemIndex of
0: Label1.Caption := ´pessoa física´;
1: Label1.Caption := ´pessoa jurídica´;
end;
[/quote:c465863eb9]
Pra atualizar a informação no banco de dados vc pode fazer de várias formas diferentes. Normalmente eu vinculo o DbRadioGroup ao campo da tabela e fazendo um IF para gravar o valor que eu quero, tipo:
[quote:c465863eb9=´Botão de gravação´]
case DbRadioGroup1.ItemIndex of
0: Query.FieldByName(´TIPO_PESSOA´).AsString := ´F´;
1: Query.FieldByName(´TIPO_PESSOA´).AsString := ´J´;
end;
//Se não tiver um campo vinculado a base de dados então passe
Query.FieldByName(´CNPJ_CPF´).AsString := Edit1.Text;
[/quote:c465863eb9]
Responder
Gostei + 0
05/07/2006
Vitor5
Obrigado por responder. No evento on click do dbradiogroup estou usando:
begin
inherited;
if dbradiogroup1.ItemIndex=0 then
begin
label20.Caption:=´CPF´;
end
else
begin
label20.Caption:=´CNPJ´;
end;
end;
O problema está quando clico no botoes proximo, anterior, etc.... que ele não traz as informações que foram gravadas no banco. O que fazer ou em que evento devo usar para ele fazer uma checagem na tabela e trazer as informções salvas ali???
begin
inherited;
if dbradiogroup1.ItemIndex=0 then
begin
label20.Caption:=´CPF´;
end
else
begin
label20.Caption:=´CNPJ´;
end;
end;
O problema está quando clico no botoes proximo, anterior, etc.... que ele não traz as informações que foram gravadas no banco. O que fazer ou em que evento devo usar para ele fazer uma checagem na tabela e trazer as informções salvas ali???
Responder
Gostei + 0
06/07/2006
Paullsoftware
Creio que vc deve informar os valores para cada item do DbRadioGroup na propriedade Values...
CPF
CNPJ
então quando for navegar pela tabela ele vai selecionar o valor que retorna do banco, mais se não funcionar vc pode tratar no evento OnChanger do DataSource... :wink:
CPF
CNPJ
então quando for navegar pela tabela ele vai selecionar o valor que retorna do banco, mais se não funcionar vc pode tratar no evento OnChanger do DataSource... :wink:
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)