05-01-2011, 09:45 PM
OCX ينبغي تسجيله قبل استخدامه
أو من سطر الأوامر:
كود :
uses
OLECtl;
var
OCXHandle: THandle;
RegFunc: TDllRegisterServer;
begin
OCXHandle := LoadLibrary ('...custom.ocx');
RegFunc := GetProcAddress (OCXHandle, 'DllRegisterServer');
if RegFunc <> 0 then
ShowMessage('Error!');
FreeLibrary (OCXHandle);
end;كود :
WinExec(PChar('regsvr32 /s custom.ocx'), SW_HIDE);