用delphi制作OCX库文件（二）
开发步骤：
1、创建ActiveX Library工程。
2、创建COM Object。
3、创建Type Library，并创建相应接口。
4、创建接口对应的函数和实现。
具体如下：
1、创建COM Object。
new|other|activeX|com object
在Class Name(本例里类名里填Object，可按自己需要填写) 填写类名.(Instancing:实例创建方式,Threading Model:线程模式.) 其
中Implemented Interface(接口名)自动生成.
uses变成如下：
uses
ComServ,
Project1_TLB in 'Project1_TLB.pas',
Unit1 in 'Unit1.pas' {Ojbect: CoClass};
加入了
{$R *.TLB}
并且生成了单元文件，以后的接口实现在这个单元里完成。
相关文档：
一) 使用动态创建的方法
首先创建 Excel 对象，使用ComObj:
var ExcelApp: Variant;
ExcelApp := CreateOleObject( 'Excel.Application' ......
ADO多线程数据库查询通常会出现3个问题：
1、CoInitialize 没有调用
（CoInitialize was not
called）；所以，在使用任何dbGo对象前，必须手
调用CoInitialize和CoUninitialize。调用CoInitialize失败会产生"CoInitialize was not
called"例外。
2、画布不允许绘画
（Canvas does not allow
drawing� ......
3.2 用户登录方案
在进入一个系统时，必须先在登录窗体中输入正确的用户名和密码才能进入。这样可以确保系统的安全性和保密性，登录窗体的制作按照系统的大小及用处，可以分为不同的登录窗体样式，在系统第一次登录前，首先要对操作员信息进行相应的设置。本节将对登录窗体及操作员管理窗体的制作过程进行详细的说明 ......
一 Dll的制作一般步骤
二 参数传递
三 DLL的初始化和退出清理[如果需要初始化和退出清理]
四 全局变量的使用
五 调用静态载入
六 调用动态载入
七 在DLL建立一个TForM
八 在DLL中建立一个TMDIChildForM
九 示例：
十 Delphi制作的Dll与其他语言的混合 ......
// 判断是否是数值型 By yangxiao 2007.7.21
function isNumeric(strText: WideString): Boolean;
var
s: string;
i, l, p: Integer;
begin
Result := False;
l := Length(strText);
if l = 0 then Exit;
s := '';
for i:=1 to l do
......
