谁能帮我检查一下到底哪里出错了
1代码如下
begin
Memo1.Text:=Memo1.Text+'一、选择题'+'(每题'+Form22.Edit2.Text+'分)'+#13#10#13#10;
a:=StrToInt(Form22.Edit1.Text);
for k:=1 To a do
begin
query1.close;
query1.SQL.Clear;
query1.SQL.Add('select 题目,选项A,选项B,选项C,选项D from danxuanbiao where 难易度='+''''+Form22.ComboBox3.Text+''' and 所在章节='+''''+Form22.ComboBox1.Text+'''');
memo1.Text:=memo1.Text+Tcaption(IntToStr(a)+query1.fieldvalues['题目'])+#13#10#13#10;
memo1.Text:=memo1.Text+Tcaption('A'+query1.fieldvalues['选项A'])+#13#10#13#10;
memo1.Text:=memo1.Text+Tcaption('B'+query1.fieldvalues['选项B'])+#13#10#13#10;
memo1.Text:=memo1.Text+Tcaption('C'+query1.fieldvalues['选项C'])+#13#10#13#10;
memo1.Text:=memo1.Text+Tcaption('D'+query1.fieldvalues['选项D'])+#13#10#13#10;
query1.open;
end;
end;
2运行结果如下
一、选择题(每1分)
1
A
B
C
D
2
A
B
C
D
.....
3问题:怎样把查询到的数据库对应字段的值显示出来(显示在memo1.Text中)
