procedure TMainForm.FlowBroker1CreateFlowOutFlowTasks(Sender: TObject; Command: TFlowOutCommand);
var
   lFlowTask: TFlowTask;
   //ContextCurrent:TContextCurrent;
   lOrgURL: TOrgURL;
   Person: TPerson;
begin

   if   DataSetBroker1.DataSet.RecordCount=0 then
    begin
      Business.Forms.Dia

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

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

在子窗体中访问主窗体中的组件，实现代码如下：

procedure TCT1.Button1Click(Sender: TObject);
var
   lform : TMainForm;
begin
   lform := TMainForm.Create(self,context);  
   lform.Edit1.Text;   {访问主窗体中 Edit1 的 Text }
end;

跨程序集引用时，都需要引用该单元：

A、首先，一个业务信息、一个业务功能、一个公共资源等等都是一个程序集；

B、同一程序集内，可以直接调用对象；如果跨程序集调用，那么需要在项目管理中加上被调用的程序集；

步骤：例如“功能1”调用“功能2”

A、双击“功能1”（是业务功能，不是窗体）；

B、（默认）在右侧的“项目管理”中，选中“功能1”

C、右击