怎么能在form2里取form1的dbedit.text内容？

[walkmanhan]

怎么能在form2里取form1的dbedit.text内容？

我是这样写的

procedure TForm2.FormCreate(Sender: TObject);
begin
adoquery1.Active:=false;

adoquery1.Parameters.ParamValues['id']:=form1.DBEdit1.Text;
adoquery1.Parameters.ParamValues['id1']:=form1.DBEdit1.Text;
adoquery1.Open;

end;


问题是 当FORM1.DBEDIT1的内容改变的时候，而取的指还是第一次的值，怎么能和form1.dbedit.text保持一制呢
？

[pilicat]

在Form1.ADOQuery1.AfterScroll事件中书写代码:
(需要先uses unit2)
form2.edit1.text:=dbedit1.text;

[coreblood]

就是楼上的了

[setfocus]

主要是要USES unit2