我有一个程序,现在比较大了,它本身在功能上就分成了五块,我想把这五块编译成独立的部分,这样程序会更小一些,最重要的是,某部分发生变化后,只要更新该部分,而不要整个程序都更新,因为我采取的是自动通过网络更新的办法,这样速度太慢,因为一个小小的改动都要全部更新程序!
有没有办法呢,本系统是一个MIS类型系统。
有没有办法呢,本系统是一个MIS类型系统。
解决方案 »
- delphi xe2 idftp使用乱码问题
- delphi有没有类似JAVA里面的MAP和list功能,可以存储2列的数据
- delphi 编程规范文档;工程项目文档;项目技术文档
- CodeGear大幅揭露Delphi和C++Builder未來的發展方向! (自李维blog)
- MDI子窗体最大化的一些限制,晕阿!
- UDP 数据包问题,可能比较菜
- 怎么判断输入的一串文本里面的每个字是字符还是数字。
- 我买了正版的程序员大本营请问到那里可以成为会员
- 一个dll问题连接数据库的问题?
- 如何在程序运行期动态设置控件焦点顺序?急!!!
- 在运行时如何将图片文件装入图象框(image)?
- 高手请进!!!!!!!!!!!
如果你的每个模块有个主窗体;
那你在针对每个模块因出一个dll;
在调用的时候将住程序句并船给每个dll;
就分割开了
*********************************************************************************
library Project1;
uses
SysUtils,
Classes,
Unit1 in 'Unit1.pas' {Form1};{$R *.res}
exports
ShowDLLForm name'showdllform';
begin
end.******************************************************************************
unit Unit1;interfaceuses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs;type
TForm1 = class(TForm)
private
{ Private declarations }
public
{ Public declarations }
end;var
Form1: TForm1;procedure showdllform;stdcall;export;
implementation{$R *.dfm}
procedure showdllform;stdcall;export;
begin
try
form1:=TForm1.Create(application);
try
form1.ShowModal;
finally
form1.Free;
end;
except
showmessage('dll中创建窗体失败!');
end;
end;
end.
***************************************************************************unit Unit2;interfaceuses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;type
TForm2 = class(TForm)
Button1: TButton;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;var
Form2: TForm2;
function showdllform:boolean;stdcall;external '//你的dll文件' name'showdllform';
implementation{$R *.dfm}procedure TForm2.Button1Click(Sender: TObject);
begin
if showdllform=truee then
showmessage('成功')
else
showmessage('失败');
end;end.
也可以动态调用,随便你了