Delphi 中动态创建窗体件 Edit.text 赋值
Form1 fsMDIChild 动态创建 Create(Application);
包含 一个 Edit, 一个 Button
点击 Button, Form2.showmodal
Form2 fsNormal 程序开始时就创建(没有从Project --> option 的左侧列表删除)
包含 一个 Edit, 一个 Button
点击 button
Form1.edit.text = self.edit.text;
self.close;
出错, 类似内存地址错误。
将如 form1 程序开始时创建,则没有错误,form1.text 被赋值
[解决办法]
fsMDIChild窗体需要有另一外窗体是fsMDIForm的才能创建
[解决办法]
Form1创建没?
if Assigned(Form1) then
Form1.edit.text = self.edit.text