麻烦大家进来看看下面的代码,有错误,望指教修改
CASE combobox1.text of
'defect_kind':
begin
adoquery2.Close;
adoquery2.sql.clear;
adoquery2.sql.text:='select defect_kind_value from defect_kind';
adoquery2.Open;
with adoquery2 do
begin
while not eof do
begin
listview1.Items.AddItem(fieldbyname('defect_kind_value'));
next;
end;
end;
end;
提示给出错误如下:
1.ordinal type required
2.incompatible types:'TListItem'and 'TField'