数据源连接错误DBEdit:field not found，求助

[summerdashu]

我在主窗体中添加了TDBGrid,TQuery,TDatasource,TDatabase组件，并相互连接成功，子窗体中的TDatasource连向主窗体中的TQuery。
主窗体部分代码如下：
procedure TForm3.Button1Click(Sender: TObject);//实现模糊查询，模糊操作（数据库内有数据就让exist=ture，默认子窗体是查看记录；
var //否则让exist=false，默认子窗体是添加记录.name和num是全局变量
str;
begin
str:='select distinct planname from boiler where planname like'+''''
+edit1.text+'%'+''''+'and plannum='+combobox1.Text;
if query1.fieldbyname('planname').asstring<>edit1.Text then
begin
if application.MessageBox('数据库内没有您要查询的数据,您想要输入新数据吗?','添加数据',MB_OKCANCEL)=IDCANCEL then
abort;
exist:=false;
end
else
exist:=true;
name:=edit1.text;
num:=strtoint(combobox1.Text);
main.showmodal;
end;
子窗体部分代码如下：
procedure Tmain.FormShow(Sender: TObject);
var
str:string;
begin
str:='select * from boiler where planname='+name+''''+
'and plannum='+inttostr(num);
form3.query1.Active:=true;
form3.query1.Close;
form3.query1.SQL.Clear;
form3.query1.SQL.Add(str);
form3.Query1.Prepare;
form3.query1.open;
end;
结果运行时在主窗体中输入planname时就会弹出错误:DBEdit64:field(Qhz) not found.
请问这是什么原因？

[cloudlyanhart]

qhz字段在数据结构里是啥？

[genispan]

你所查出的字段中没有那个字段。
建议把QUERY的属性设置为true
先把字段设置好后，再设置QUERY为false 这样字段对应就不会错了

[renmeiquan]

[color=#FF0000][/color]