form2.show;
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; }form4中的edit没有文本
没办法只有换成
form2.Edit1.Text:=trim(form4.edit1.text);
form2.Edit2.Text:=trim(form4.edit2.text);
form2.Edit27.Text:=trim(form4.edit1.text);
form2.Edit28.Text:=trim(form4.edit2.text);
但是我还是想用第一种方法去实现,高手帮忙看看注释的那段代码那里有问题,谢谢了
也可以直接告诉我,我的qq190238861