快捷搜索:  as  2018  FtCWSyGV  С˵  test  xxx  Ψһ  w3viyKQx

和记娱乐黄埔怡情:第七章剪贴板和动态数据交换(二)(3)



7.3.9 用客户法度榜样节制法度榜样治理器

下面的例子用客户法度榜样向法度榜样治理器发送敕令,用于创建法度榜样组、法度榜样项以及删除法度榜样组。

法度榜样治理器供给了利用法度榜样的DDE接口敕令字符串,利用法度榜样使用这些敕令字符串可以实现以下的功能:

1.创建法度榜样组

敕令款式为:

CreateGroup(法度榜样组名[,法度榜样组所在的路径])

法度榜样组不存在时进行创建;如法度榜样和记娱乐黄埔怡情组存在则按照指定的路径激活。

2.删除法度榜样组

敕令款式为:

DeleteGroup(法度榜样组名)

3.显示法度榜样组

敕令款式为;

ShowGroup(法度和记娱乐黄埔怡情榜样组名,显示标志)

显示标志用于节制法度榜样组在法度榜样治理器中以极大年夜、极小或正常要领显示。和记娱乐黄埔怡情

4.从新装入法度榜样组

敕令款式为:

ReLoadGroup(法度榜样组名)

该敕令使法度榜样治理器先删除而后再从新装入一个已有的法度榜样组。

5.向法度榜样组中添加法度榜样项

敕令款式为:

AddItem(敕令行[,描述[,图标路径[,图标序号[,图标横坐标,图标纵坐标[,事情区目录[,热键[,是否最小化显示标志]]]]]]])

敕令行节制法度榜样项的履行,可包括路径、参数等。其它和记娱乐黄埔怡情参数分手对应在法度榜样治理器中添加一个法度榜样项时必要设置的参数和选项。它们都出缺省设置,因而是可选的。

6.调换法度榜样组中的法度榜样项

敕令款式为:

WordStrItem(法度榜样项名)

该敕令删除一个法度榜样项,并将所删除法度榜样项的位置记录下来,今后经由过程AddItem在这个所记录的位置增添新项目。

7.从法度榜样组中删除法度榜样项

敕令款式为:

DeleteItem(法度榜样项名)

从当前活动法度榜样组中删除一个法度榜样项。

8.关闭法度榜样治理器

敕令款式为:

ExitProgram(是否保存法度榜样组信息标志)

从利用法度榜样向法度榜样治理器发送敕令字符串的措施是基础同等的。为简便起见,在例程中只实现了此中仅包孕一个字符串参数的情形,读者可以很轻易作进一步的扩展。

法度榜样设计界面如图所示,包孕一个DDE客户会话(DDEClientConv)部件和四个完成不合功能的按钮。

DDEClientConv在设计时和法度榜样治理器建立一个DDE会话,此中DDE办事器和DDE主题 都为PROGMAN。联接模式ConnectMode设置为ddeManual。

我们把只有一个字符串参数的敕令发送环境抽象出来,形成下面的SendMacro函数。

function TFo和记娱乐黄埔怡情rm1.SendMacro(Name: String;Command: String): Boolean;

var

Macro: String;

Cmd: array[0..255] of Char;

begin

Result := True;

if Name

您可能还会对下面的文章感兴趣: