如何在窗体代码中调用其它窗体

ntcp

窗体之间调用分为两种情况：

1、两个窗体在同一Assembly（如业务功能）中：假设在“窗体A”中调用“窗体B”（TFormB）
  var
    lForm: TFormB;  {声明，窗体B}
  begin
    lForm := TFormB.Create(Self.Context);  //得到窗体B的实例
    try
      Dialogs.ShowMessage(lForm.Caption);  //显示窗体的Caption
    finally
      lForm.Free;
    end;
  end;

2、两个窗体在不同的Assembly（如一个业务功能和一个资源集）中：假设“业务功能A”中“窗体A”调用“资源集B”（ZYJ_B）的“窗体B”（TFormB），设置步骤：
  A、在项目管理中，通过“业务功能A”的右键菜单的“配置项目属性”选项，在“引入”页面引用“资源集B”
  B、在“业务功能A”“窗体A”中书写代码
  var
    lForm: ZYJ_B.TFormB;  {资源集B的窗体B}
  begin
    lForm := ZYJ_B.TFormB.Create(Self.Context);
    try
      lForm.ShowModal;
    finally
      lForm.Free;
    end;
  end;