Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
VFP7 and DotNet Framework.
Message
 
 
To
20/11/2000 17:22:45
General information
Forum:
Visual FoxPro
Category:
Other
Miscellaneous
Thread ID:
00443342
Message ID:
00443897
Views:
13
>>With all of the "built just yesterday" software I've got installed, believe it or not there isn't a single object on any of my work boxes that shows as implementing this interface.
>
>But how would you know? :-)

Exactly my thought, which is why I thought about trying the poolable object I know I have on the home box (created it myself, so I know what it implements).

> I checked this object in the object browser, and sure enough, IObjectControl doesn't show as an inherited interface. Hmm.

Interesting. For the reasons you stated earlier, I figured it stood a chance of showing up.

>Yup. My methods show up, but all under the default interface IMyObject.

You should be seeing something along the lines of:
IMyObject
    IImplementedInterface_MyMethod1
    IImplementedInterface_MyMethod2
IImplementedInterface
    Method1
    Method1
This will be listed under the Classes node as I described earlier. For more clarity, go up to http://www.mikeandkatherine.com/imp.jpg. This is what I'm seeing, and it's what I would expect. This implements IFoxChat from another VFP DLL. The methods I created in IFoxChat are GetText, LogOn, and SendText (the rest, as I'm sure you know, are standard COM methods that came along for the ride). If you look at the IFoxChat interface in the right pane, the methods are there. However, if I were to have expanded the methods node in the left pane, all I would see would be IFoxChat_GetText, etc., and the three methods listed above would not show up. Also, if I were to have expanded the Interfaces node in the left pane, all I would see would be the default interfaces (ISuperClass, etc.), and not the implemented interfaces in each class. This is all expected.

Just for reference, here's the code that creates the SuperClass in the image above:
DEFINE CLASS SuperClass As Session OLEPUBLIC
	IMPLEMENTS Ifoxchat IN "chat_server.FoxChat" &&{263FA140-A732-490D-8F6F-0E30BE4ED6C6}#1.0

	PROCEDURE Ifoxchat_LogOn(lsScreenName AS STRING) AS VARIANT
	* add user code here
		RETURN .t.
	ENDPROC

	PROCEDURE Ifoxchat_GetText(lsText AS STRING @, liLast AS Number @) AS VARIANT
	* add user code here
		RETURN 1
	ENDPROC

	PROCEDURE Ifoxchat_SendText(lsText AS STRING) AS VARIANT
	* add user code here
		RETURN "Some text"
	ENDPROC
ENDDEFINE
> Is it possible that the Miami release doesn't do this correctly, or is it more likely that I am experiencing cerebral flatulence?

In the image above, what would you expect to see?
Mike Stewart
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform