Delphi多层开发方案比较
标题
Delphi多层开发方案比较 （转载）
关键字
Delphi多层开发方案比较
出处
方案->
Midas
DCOM
COM+
ASTA
RemoteObject
.NET
提供者
Borland
微软
微软
http://www.astatech.com
http://www.remobjects.com
微软
核心技术
COM
COM
COM
ASTA自己的，类同Midas，
但不依赖于COM
RemObjects自己的WebService技术，
不依赖于COM
WebService
开发工具
Delphi7
Delphi7
Delphi7
Delphi7
Delphi7
Visual Studio/Delphi8,9
与现有开发模式兼容程度
★★★★★
★★★★
★★★★
★★
(很不同的开发模式)
★★★★
(支持Delphi的Prvider/ClientDataSet)
★
部署容易程度
★★★
★★
★
★★★★
(集成server、不需要类似socket server、midas.dll的东西)
★★★★★
(集成server、不需要类似socket server、midas.dll的东西)
★
可伸缩性
★★★★
★★★★
★★★★★★
★★★★
★★★★★
（支持自带服务器，或者使用Apache/IIS等容器)
★★★★
性能(效率)
★★★
★★★★
★★★★
★★★★★
(二进制传输，支持压缩)
★★★★
(二进制传输，支持压缩)
★★
(文本的XML消息传输)
消息传输格式
二进制COM消息
二进制COM消息
二进制COM消息
二进制流
二进制流或文本的XML SOAP消息
XML SOAP消息
源程序
不全
无
无
有
有
无
购买价格
$0
$0
$0
$299 － $7,500
EUR 299
$0
与.NET集成
不可以
可以
可以
不可以
可以
(直接基于webservice并提供.NET客户端开发包，并可以使用二进制消息格式)
可以
中间件跨平台
有可能
不可能
不可能
有可能
可以
（支持Kylix开发，支持Apache做容器）
可能吧
总体评价
★★★
★★
★
★★★★
★★★★★
★★
速度与效率测试：
测试项目 *
计算1000次1+1=2 *
传输10000条100字节记录 *
所花时间(ms) *
传输字节数 *
所花时间
传输字节数
Midas (Socket Connection)
26,047
366,000
2,359
1047,000
Midas (DCOM Connection)
812
933
2,047
1047,000
ADO直连数据库 （两层）
297
1046,000
Asta 3 压缩
1,578
1100,000
RemoteObject2 HTTP 二进制 压缩
8,641
791,000
2,515
104
相关文档：
Ctrl+PageUp 将光标移至本屏的第一行，屏幕不滚动。
Ctrl+PageDown 将光标移至本屏的最后一行，屏幕不滚动。
Ctrl+↓ 向下滚动屏幕，光标跟随滚动不出本屏。
Ctrl+↑ &nb ......
function GetFileSizeString(const pFileName: String):String;
var
iFileSize: Int64;
begin
Result := '0';
iFileSize := FileSizeByName(pFileName);
Result := IntToStr(iFileSize);
end;
function WinExecAndWait(strFileName: string; uCmdShow: UINT): DWORD;
var
cAppName: array ......
Rem Delete Delphi temporary file
Rem ****************************
@echo Delete Delphi temporary file
@dir/w/s *.~*
@echo 以上为当前目录及子目录临时文件,请按任意键确认删除!
@pause
@for /r . %%a in (.) do @if exist "%%a\*.~*" del "%%a\*.~*"
@echo 删除成功!
@pause
Rem ************************* ......
unit unitMain;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;
type
TForm1 = class(TForm)
Button1: TButton;
Button2: TButton;
Button3: TButton;
procedure Button1Click(Sender: TObject);
procedure Button2 ......
http://www.delphibbs.com/delphibbs/dispq.asp?LID=2421470
本文是《Delphi 的RTTI机制浅探》的续篇，上篇地址在：
http://www.delphibbs.com/delphibbs/dispq.asp?lid=2420610
本文上篇基本上是
RTTI 入门介绍，续篇介绍了所有 TypInfo.pas 中的函数，附加了 Classes.pas、Graphics.pas、Controls.pas
中的 ......
