Question

delphi中有关两个模块相关联的问题

在第一个界面有生产批次和盒数。
此时，我点击一个按钮，链接到另一个界面，

想在第二个界面的生产批号和生产盒数 变成与第一界面 数据一样。
请问如何实现？





Answer 1

界面2的unit中引用界面1，然后在界面2的formshow事件中为界面2的数据赋值。假设界面1的单元为unit1，窗口名为form1 界面2为unit2，窗口名为form2。
unit2.pas
....
implementation

uses
unit1;
// formshow事件
procedure TForm2.FormShow(Sender: TObject);
begin
scpc.text := form1.scpc.text; // 生产批次
yrhs.text := form1.yrhs.text; // 生产盒数
.....

end;