>When I run the code below
>

>Arquivo_Inix = SYS(5) + SYS(2003) + "\SISTEMA.ini"
>loBIBLIO_Ini = CREATEOBJECT("arquivos_ini.dll", Arquivo_Inix)
>

>It returns this error message:
>
>"Class definition ARQUIVOS_INI.DLL is not found."
>
>arquivos_ini.dll is a Multi-threaded COM DLL generated with VFP and is registered.
>I'm also passing a value to the INIT event of the DLL
>
>Any ideia why it doesn't work?
>
>TIA

You could make an instance f VFP created DLL like this:
DLLName.ClassInIt

So, you MUST use this:

loBIBLIO_Ini = CREATEOBJECT("arquivos_ini.ClassNameFromThatDLL")

Also keep in mind that COM server didn't accept parameters in INIT event, so you must create your own method to handle what you want. Let me explain (I hope I could)

Make a project named ARQUIVOS_INI.
Add a Program in it, no matter what its name.
In that ORG put:

DEFINE CLASS MyClass AS Custom OLEPUBLIC

      FUNCTION HandleINIFiles(lcPath AS STRING) AS String
         LOCAL lcRetVal
         lcretVal = ""
         IF NOT EMPTY(m.lcPath)
            **** do what you want to do here
         ENDIF
     RETURN  lcRetval

ENDDEFINE

Then in other application you cold use this:

Arquivo_Inix = SYS(5) + SYS(2003) + "\SISTEMA.ini"
loBIBLIO_Ini = CREATEOBJECT("arquivos_ini.MyClass")
? loBIBLIO_Ini.HandleINIFiles(m.Arquivo_Inix)