关于radioGroup内的值怎么通过adoquery输入的问题??

Question

radioGroup里有几个items值,例如 "转出"."转入"等
想实现把radiogroup.items里的值通过adoquery输入到相应的字段里去,怎么实现呀!
以下是我"添加"按钮的代码:
procedure TF_main.BitBtn10Click(Sender: TObject);
begin
 with datamodule1.adoq_xjbg do
          begin
            edit;
            fieldbyname('变更').asstring:= radiogroup1.Itemindex ;//错误
            post;
          end;
end:
但提示:tyeps:'string' and 'intger'
能否帮助改一下.先谢谢了!

Answer 1

fieldbyname('变更').asinteger:= radiogroup1.Itemindex ;//错误
或
fieldbyname('变更').asstring:= inttostr(radiogroup1.Itemindex) ;//错误

Answer 2

fieldbyname('变更').asstring:= radiogroup1.Items[radiogroup1.Itemindex];

Answer 3

fieldbyname('变更').asinteger:= radiogroup1.Itemindex + 1 ;
或
fieldbyname('变更').asstring:= inttostr(radiogroup1.Itemindex + 1) ;取出时再减1就行了