admin 管理员组文章数量: 887032
2024年2月20日发(作者:乱世三义原型是谁)
Delphi中ScriptControl的高级应用(一)
在我们的Windows系统里提供了一个叫ScriptControl的OCX组件,我们可以用这个组件来实现脚本故事世界的精彩。
1、创建ScriptControl组件服务
首先,我们来看一下该组件都有哪些方法和属性。如图001,002。
图001
图002
接着,我们用Delphi创建组件服务。
从图001可知,该组件的ProgID为“Control.1”。所以我们可以这样创建组件:
Var
sc : OleVariant;
begin
sc := CreateOleObject('Control.1');
//使用Language属性来设定该组件所使用的语言
//语言可以为:VbScript、JavaScript(也可缩写为JScript)
//相当于在HTML里用的