Hi people!

Take a look in this code: MyTest.PRG

Define Class MyClass As Session OlePublic
   WarningMessage = ""
   Dimension WarningMessage_COMATTRIB[5]
   WarningMessage_COMATTRIB[1] = 0
   WarningMessage_COMATTRIB[2] = "Stores warning messages"
   WarningMessage_COMATTRIB[3] = "WarningMessage"
   WarningMessage_COMATTRIB[4] = ""
   WarningMessage_COMATTRIB[5] = 0
EndDefine

If I use this class with VFP as following, the intellisense shows me a lot of events, properties and so on... Example:

x = CreateObject("MyClass")
x. [intellisense...
  +---------------------------
  | Init
  | Destroy
  | ...
  | WarningMessage
  | ...
  +---------------------------

But, If I use this class like a COM object, the intellisense show me just the "WarningMessage" property.

x = CreateObject("Test.MyClass")
x. [intellisense...
  +---------------------------
  | WarningMessage
  +---------------------------

One more thing: The Help Message "Stores warning messages" .and. Property name capitalization just works in the second sample.

Is there some way it works when I using just VFP class?

Thanks!