COMDCOM对象中通过Variant传递数组

因为COM/DCOM对象都不在Client程序运行的内存空间(内进程COM对象除外，即便如此，为了统一接口，内进程的COM也不得传递指针),而且在Win32中所有的程序都有自己独立的2GB的内存空间,程序与程序之间传递指针(内存地址)是毫无意义的，而数组、字符串等大量的数据在程序中都是分配一定的内存空间，然后用指针加内存偏移量来存取数据的，这时，如何在COM/DCOM对象中如何传递呢？
在Win32中引入了一新变量Variant，可以通过Variant传递数组。具体的实现方法，用Delphi实现为：

Server(COM/DCOM程序)端：
procedure TTestDCOM.Send4(Size: Integer; D1: OleVariant);
type
TData=array [0..999] of Byte;
Var
Data:TData;
i:Integer;
begin
for i:=0 to Size-1 do begin
Data[i]:=D1[i];
end;
end;

Cleint端:

Var
D1:OleVariant;
begin
D1:=VarArrayCreate([0,99],varByte);

{
D1[1]:=45;
.... file://将值存入D1中

}
S.Send4(99,D1); file://S是TestDCOM对象
end;

作者：高素梅

　　配置数据引擎(BDE、SQL Link)的简单方法

　　在数据库程序分发时，需要携带数据引擎(BDE、SQL Link)，并且在客户端安装完程序后还需要配置数据引擎，如用户名(username)、密码(Password)等等。如果手工配置的话，工作量比较大，这时，我们可利用InstallShield For Delphi轻松实现配置。在用InstallShield For Delphi制作安装程序时，在生成安装程序的目录里有一个*.iwz的文本文件，只要在[IDAPI Alias]片段中手工加入即可。 例如：

　　[IDAPI Alias]

　　username=SYSDBA

　　password=masterkey

　　安装程序后数据引擎自动配置完毕。

　　制做快速按钮条的方法

　　快速按钮条上的每一个图形按钮都代表着一项常用的功能，同时，这些图形按钮尺寸较普通的图标大，可以放置更大、更形象的图形，甚至可以带上简短的提示，这对于用户执行最常用的功能很有帮助。基于上述原因，越来越多的Windows应用程序采用快速按钮条来改善应用程序的界面。笔者在用Delphi编程时，采用了两种不同的方法来实现快速按钮条，本文结合制作一个具有两组、共六个按钮的快速按钮条的实例，列出了这两种方法的具体设计步骤。

　　1.组合生成法

　　(1)在窗体上放置一个Panel1对象，作为图形按钮的载体。

　　(2)设置Panel1的属性Caption为空，属性Align为alTop,调整其高度至合适尺寸。

　　(3)在Panel1上放置六个SpeedButton按钮(选用SpeedButton，是因它具有浮动特性)。

　　(4)在Panel1上放置两个Bevel对象，调整其位置和大小，用于分隔按钮组。

　　(5)调整SpeedButton1的大小及在Panel1中的位置。

　　(6)选择SpeedButton1，设置其属性Flat为True。

　　(7)单击SpeedButton1的属性Glyph所对应的省略号小按钮，打开PictureEditor窗口，选择一个象征“查询”的图标。设置属性ShowHint为True,属性Hint为“查询”。

　　(8)按步骤（5）至（7）的方法，分别设置好其余几个SpeedButton按钮的属性。

　　这样，一个快速按钮条就制作完成了。运行时，快速按钮均以浮动方式显示，当鼠标移至其上时，即显示按钮外框，并显示小提示。

　　2.借用ToolBar生成法

　　(1)在窗体上放置一个ToolBar1对象。

　　(2)设置ToolBar1的属性EdgeBorders.ebLeft、ebTop、ebRight、ebButtom均为True；属性Flat为True;调整ToolBar1的大小至合适尺寸。

　　(3)选择ToolBar1，用右键点出快速选单，分别点击NewButton和NewSeparator增加六个按钮ToolButton和两条分隔栏线。

　　(4)任意选择一个ToolButton按钮，调整其大小至合适尺寸，所有的ToolButton也同时被调整好。

　　(5)设置ToolBar1的属性BorderWidth为3，以调整ToolButton的位置。

　　(6)在窗体上放置一个ImageList1对象，设置它的属性Height和Width的数值，以适应较大尺寸的图像。

　　(7)双击ImageList1，通过“Add”按钮分别装入六个图像，与ToolBar1中的六个ToolButton一一对应。

　　(8)设置ToolBar1的属性Images为ImageList1。

　　(9)设置六个ToolButton的属性ShowHint为True，并分别设置各自的小提示属性Hint。

　　(10)还可以设置ToolBar1的HotImages指定鼠标指向按钮时的图片集。

　　采用ToolBar实现的快速按钮条在外观上与第一种方法制作的类似。

　　以上两种方法均能实现快速按钮条，但各有千秋：第一种设计过程较为简单；第二种方法则提供了更多的功能，如可用HotImages指定鼠标指向按钮时的图片集。读者不妨从中选择一种，并可继续完善其功能。

　　建立临时表的方法

　　数据输入是开发数据库程序的必然环节。在Client/Server结构中，客户端可能要输入一批数据后，再向服务器的后台数据库提交，这就需要在本地(客户端)建立临时数据表来存储用户输入的数据，待提交后，清除本地数据表。这种方法的好处是：提高输入效率，减小网络负担。

　　由于用户一次输入的数据量一般情况下较小(不会超过几百条记录)，所以临时表可以建立在内存中，这样处理速度较快。临时表创建有如下两种方法：

　　1.使用查询控件创建临时表

　　第1步：在窗体上放入查询控件(TQuery)，并设置好所连接的数据表。

　　第2步：添加如下语句：

　　TQuery. CachedUpdates=True;

　　TQuery. RequestLive=True。

　　第3步：在原有的SQL语句后加入一条Where子语句，要求加入这条Where子语句后SQL查询结果为空。

　　例如：

　　SELECT Biolife."Species No", Category, Common_Name, Biolife."Species Name", Biolife."Length (cm)", Length_In, Notes, Graphic

标签：

版权申明：本站文章部分自网络，如有侵权，请联系：west999com@outlook.com
特别注意：本站所有转载文章言论不代表本站观点，本站所提供的摄影照片，插画，设计作品，如需使用，请与原作者联系，版权归原作者所有