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.
>