Hi everybody,
I have a COM server with a LPARAMETERS in the INIT event :
Define Class MyClass As Custom Olepublic
SomeProperty = ""
Function Init
LParameters p_MyParameter
If PCount() = 1
This.SomeProperty = p_MyParameter
Else
This.SomeProperty = "No parameter"
EndIf
EndFunc
EndDefine
I compile this project as a DLL COM server....
In another application, I use the following syntax :
OInstance = CreateObject("MyComServerProject.MyClass","Parameter passed")
MessageBox(OInstance.SomeProperty)
The MessageBox always displays "No parameter"...
Any idea why ????
Thanks in davance...