Question

delphi radiobutton

我用两个radiobutton,一个是男，一个是女，
定义一个变量sex，
procedure TForm3.RadioButton1Click(Sender: TObject);
begin
sex:='男';
datashow;
end;

procedure TForm3.RadioButton2Click(Sender: TObject);
begin
sex:='女';
datashow;
end;

并且用下列语句输入数据库，
form1.ADOTable1.FieldByName('性别').AsString:=sex;
--------------------------------------------------------------
请教高手，如果想从数据库提取该数据资料，如何编写？
我曾实验过
sex:=form1.ADOTable1.FieldByName('性别').AsString;
可是不行。

Answer 1

用RadioGroup好些;
RadioGroup1.Items[RadioGroup1.ItemIndex];
adoquery1.FieldValues['ddd']:='男';
adoquery1.FieldByName('s').AsString:='d';这样写都可以啊
从数据库提取数据
定义变量sex:string;
sex:=ADOQuery1.FieldByName('性别').AsString;