在线小问题

Question

with cydxgform do   //赋书的有关信息给重印单录入中的一些 dbeedit
  begin
    with query1 do
    begin
//    query1.Active:=true;
    query1.Datasource:=cydjcydglform.query5.datasource;
    query1.recno:=cydjcydglform.query5.recno;     editcydh.text:=FieldByName('重印单号').AsString;
     editzdrq.text:=datetostr(FieldByName('制单日期').Asdatetime);
     editsm.text:=FieldByName('书名').AsString;
     editsdh.text:=FieldByName('书代号').AsString;
      editzz.text:=FieldByName('作者').AsString;
      editdj.text:=FieldByName('定价').AsString;
      editbyc.text:=FieldByName('版次').AsString+'版/'
         +FieldByName('印次').AsString+'次';
query1.recno:=cydjcydglform.query5.recno着句报错
error query1 is a close dataset,
请问高手我该增么改？？

Answer 1

query1.Active:=true;一句放在以上空行处试一试