Fórum Não inicia com valor inicial #57835

Pessoal

No evento NewRecord defini assim:

CdsRecAna.FieldByname(´SITUACAO_CONTARECEBER´).asInteger := 1;


No evento onGetText defini assim:

if Sender.Value = ´1´ then
Text := ´Em aberto´
else if Sender.Value = ´2´ then
Text := ´Quitado´;


No evento onSetTEXT defini assim:
if Text = ´Em aberto´ then
Sender.Value := 1
else if Text = ´Quitado´ then
Sender.Value := 2

No form tem um componente dbradiogroup com 2 botês de rádio:
Em aberto
Quitado

Quando dou um append na tabela deveria apontar como em aberto, mas não está acontecendo, os botões de rádio continuam em branco

Na propriedade Values do Componente coloquei os valores: 1 e 2
e na propriedade Items (TSTRINGS) coloquei as descrições Em aberto, Quitado.. O que pode ser ??

Estou usando Delphi 7 + Interbase 6.0 + conexão com Dbexpress
Aguardo retorno

Rogério