为什么是这样

Question

form4.adoquery1.Close;
form4.adoquery1.sql.clear;
form4.adoquery1.SQL.add(format('select * from patient where ccid= ''%s''',[form3.pct]));
form4.adoquery1.open;
form4.adoquery1.First;
repeat
form2.Edit1.Text:=form4.adoquery1.fieldbyname('id').asstring;
form2.Edit2.Text:=form4.adoquery1.fieldbyname('name').asstring;
form2.Edit27.Text:=form4.adoquery1.fieldbyname('id').asstring;
form2.Edit28.Text:=form4.adoquery1.fieldbyname('name').asstring;
form4.adoquery1.Next;
until form4.adoquery1.eof;
adoquery1.Close;
form2.show;
form4.hide;
居然form4中的edit里面什么都没有，真的不清楚是怎么回事

Answer 1

>>居然form4中的edit里面什么都没有晕,是form2中的edit吧，edit中没有数据，那就应该是sql语句没有查询到数据，form4.adoquery1.open;之后，，if (form4.adoquery1.RecordCount = 0) then
begin
  showMessage('没有查询到数据~~~');
end;

Answer 2

form2.Edit1.Text:=form2.Edit1.Text+上面的