AnsiString strOcxPath, strCurrDir;
    strCurrDir = ExtractFilePath(Application->ExeName);
    strOcxPath = strCurrDir + "test.ocx";

    const char *szFileName = strOcxPath.c_str();

    HRESULT hr = S_OK;
    HINSTANCE hInst = ::LoadLibrary((LPCTSTR)szFileName);
    if (hInst == NULL)
        return GetLastError();

    FARPROC fnProc = ::GetProcAddress(hInst, "DllRegisterServer");
    if (fnProc != NULL) {
        hr = (*fnProc)();
    } else
        hr = GetLastError();
    ::FreeLibrary(hInst);


질문 님이 쓰신 글 :
: 자신이 만든 ActiveX(OCX)를 수동으로 설치 할 수 있게 EXE로 만들수 있을까요?
: 인스톨 쉴드...로 만들어야 되는 건가요?
:
: OCX를 만들었는데 웹에서 다운로드는 잘 됩니다.
:
: 만약 사용자가 수동으로 설치 하려면...
:
: ....
:
: 쪕...