Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
OLEPublic dll can not be found by calling program
Message
 
 
To
22/10/2002 08:32:15
General information
Forum:
Visual FoxPro
Category:
COM/DCOM and OLE Automation
Miscellaneous
Thread ID:
00713637
Message ID:
00713863
Views:
17
Beth,
First off, you are not allowed to display UI elements in COM DLLs. You can if you create COM EXEs.

Second, I received an error when compiling this and added
EXTERNAL ARRAY pdisplayarray
just below the parameters statement.

Even with all of this, the test program you originally posted worked up until the UI display. Make sure the DLL exists. Use RegEdit or RegEdt32 to check your registry for the DLL entry. If the DLL exists but the registry entries don't, use Regsvr32 to register your DLL:

regsvr32 Testing.Dll

HTH.

>The class definition is:
>
DEFINE CLASS test1 AS CUSTOM OLEPUBLIC
>  PROCEDURE ArrayDisplay()
>    PARAMETERS pdisplayarray
>    LOCAL cFile_name, lnRowcount, lnColCount, lnloop1, lnloop2
>    lnRowcount = ALEN(pdisplayarray,1)
>    lnColCount = ALEN(pdisplayarray,2)
>    IF lnRowcount > 0
>      cFile_name = SYS(3) + ".TXT" && Generate a unique file name.
>      SET CONSOLE OFF
>      SET ALTERNATE TO (cFile_name)
>      SET ALTERNATE ON
>      ? "---------[Rows in Array]----------------------------------------"
>      FOR lnloop1 = 1 TO lnRowcount
>        ? "Row" + ALLTRIM(STR(lnloop1)) + ": " + pdisplayarray[lnloop1,1]
>        IF lnColCount > 0
>          FOR lnloop2 = 1 TO lnColCount
>          ? "Column" + ALLTRIM(STR(lnloop2)) + ": " + pdisplayarray[lnloop1,lnloop2]
>          ENDFOR
>        ENDIF
>      ENDFOR
>    ENDIF
>    ?
>    ?
>    SET CONSOLE ON
>    SET ALTERNATE OFF
>    CLOSE ALTERNATE
>    CLEAR TYPEAHEAD
>    DEFINE WINDOW wPopup_win AT 1.083, 1.500 SIZE 22.063,75.250 SYSTEM ;
>      FONT "Courier New", 10 STYLE "B" GROW FLOAT CLOSE NOMINIMIZE
>    ACTIVATE WINDOW wPopup_win TOP
>    SET MESSAGE TO ALLTRIM(L_QM_SQL.MSG46)
>    MODIFY COMMAND (cFile_name) NOEDIT WINDOW wPopup_win
>    RELEASE WINDOW wPopup_win
>    ERASE (cFile_name)
>  ENDPROC
>enddefine
>
>As the name suggests, this is just a test project to see if I can build the Dll. I build this project as a Multi-thread COM Server (DLL). This program is the only thing in the project.
>>Beth,
>>Could you post the class definition here? Is a DLL created? If so, do the >necessary registry entries exist after you build it?
>
>>I am using VFP 6.0 sp5, NT 4.0 sp6.
>>
Larry Miller
MCSD
LWMiller3@verizon.net

Accumulate learning by study, understand what you learn by questioning. -- Mingjiao
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform