L
LUCKWZY
Unregistered / Unconfirmed
GUEST, unregistred user!
我想要在几个放有DB控件(DBEDIT,DBCOMBOBOX,DBGRID)的FORM中,从其中一个FORM
中的特定事件改写其他FORM中特定控件的值,每次调用系统都会报错?
例:在FORM1的中BOTTOM1.CLICK
PROCEDURE FORM1.BUTTOM1CLICK(Sender: TObject);
var order_form:tform2;
begin
order_form:=tform2.Create(self);
order_form.ShowMODAL;
END;
当FORM2--order_form显示时,再调用FORM2中的BUTTOM1.click事件
PROCEDURE FORM2.BUTTOM1CLICK(Sender: TObject);
begin
Form1.dbedit1.text:='abc' ///系统总是报错,怎样解决急!!!!
END;
中的特定事件改写其他FORM中特定控件的值,每次调用系统都会报错?
例:在FORM1的中BOTTOM1.CLICK
PROCEDURE FORM1.BUTTOM1CLICK(Sender: TObject);
var order_form:tform2;
begin
order_form:=tform2.Create(self);
order_form.ShowMODAL;
END;
当FORM2--order_form显示时,再调用FORM2中的BUTTOM1.click事件
PROCEDURE FORM2.BUTTOM1CLICK(Sender: TObject);
begin
Form1.dbedit1.text:='abc' ///系统总是报错,怎样解决急!!!!
END;