文章列表
 
您正在查看 "Justep Business" 分类下的文章

2008-12-28 14:48

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

 
2008-03-25 15:16

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

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

 
2008-03-25 15:14

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

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

 
2008-03-25 15:09

跨程序集引用时,都需要引用该单元:

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

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

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

A、双击“功能1”(是业务功能,不是窗体);

B、(默认)在右侧的“项目管理”中,选中“功能1”

C、右击

 
 
   
 
 
文章存档
 
     
 
最新文章评论
  

如何把类对象保存到数据库?能不能详细说一下
 

实现接口TIntfClass = class(TObject, IMyInterface)这里错了吧,应该是下面这样的吧
 

最近剛好在學習 BOM,不錯的資料,謝謝!
 

QQ 36838263
 

这个女人好强大
   
帮助中心 | 空间客服 | 投诉中心 | 空间协议
©2012 Baidu