Fórum Client Data Set - Não sei o que está acontecendo #156693
29/04/2003
0
Em um cadastro de usuários tenho um campo ATIVO que é do tipo NUMBER(1). Estou utilizando o componente TClientDataSet e TDBCheckBox. Defino as propriedades ValueChecked e ValueUnCheck do TDBCheckBox como 1 e 0 respectivamente. Estou tento o seguinte problema. Quando preencho os campos do formulário (NOME, etc) sem tocar no TDBCheckBox, o registro é gravado sem problemas. Mas se deixo o TDBCheckBox marcado ou desmarcado o registro não é gravado.
Eu faço o CDS.Post e depois o CDS.ApplyUpdates(-1).
Será que alguém pode me dar uma dica do que pode estar acontecendo?
Obrigado.
Eu faço o CDS.Post e depois o CDS.ApplyUpdates(-1).
Será que alguém pode me dar uma dica do que pode estar acontecendo?
Obrigado.
E_marcus
Curtir tópico
+ 0
Responder
Posts
29/04/2003
Crash
Kra tenta colocar um TCheckBox no lugar de um TDBCheckBox.
Ae voce cria um Case
Case CheckBox1.Checked of
True: CDS.FieldByName(´CAMPO´).Value:= 0;
False: CDS.FieldByName(´CAMPO´).Value:= 1;
end;
e o contrario quando voce quiser que o checkbox receba o valor do campo.
Case CDS.FieldByName(´CAMPO´).Value of
0: CheckBox1.Checked:= True;
1: CheckBox1.Checked:= False;
end;
flws
Ae voce cria um Case
Case CheckBox1.Checked of
True: CDS.FieldByName(´CAMPO´).Value:= 0;
False: CDS.FieldByName(´CAMPO´).Value:= 1;
end;
e o contrario quando voce quiser que o checkbox receba o valor do campo.
Case CDS.FieldByName(´CAMPO´).Value of
0: CheckBox1.Checked:= True;
1: CheckBox1.Checked:= False;
end;
flws
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)