DELPHI能够兼容COM的数据类型,反之,则不成立。
在此举个简单的例子:
//DELPHI
procedure Tyn.save2(data: olevariant; out errcount: integer);
begin
dspunit.ApplyUpdates(data, 0, errcount);
end;
//COM
procedure Tyn.save(data: OleVariant; out errCount: SYSINT);
begin
save2(data, errcount);
end;
这个例子的价值:
把以前的两层向多层移植的话,可以保留原来的业务类。
但数据类型无疑要进行转换。