给你一个例子://引入注册函数,假设TTF16.ocx在c:\windows\system下 function OCXRegister : LongInt; stdcall external 'c:\windows\system\ttf16.ocx' name 'DllRegisterServer'; //在FormCreate中调用 ......FormCreate(sender : TObject); var h : LongInt; begin h := OCXRegister; if h=S_FALSE then showmessage('注册失败'); end;
function OCXRegister : LongInt; stdcall external 'c:\windows\system\ttf16.ocx' name 'DllRegisterServer';
//在FormCreate中调用
......FormCreate(sender : TObject);
var
h : LongInt;
begin
h := OCXRegister;
if h=S_FALSE then showmessage('注册失败');
end;
不好意思,再问一个弱智一点的问题。不要见笑。
如何查某个控件是属于哪个文件?Ocx文件?
我只懂得看某个package是属于哪个bpl文件。呵呵!