Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Writing a Delphi COM server for use with VFP
Message
De
16/11/2001 12:52:23
Liam O'Hagan
O'Hagan Programming Ltd
Irlande
 
 
À
16/11/2001 12:27:54
Cetin Basoz
Engineerica Inc.
Izmir, Turquie
Information générale
Forum:
Visual FoxPro
Catégorie:
COM/DCOM et OLE Automation
Divers
Thread ID:
00582785
Message ID:
00582814
Vues:
23
Hi Cetin,

Thanks for your reply.

obj = CreateObject("VisionCom.VisionComServer") gives me the "No Such Interface Supported" error.

obj = CreateObjectex("VisionCom.VisionComServer", "\\liamdesktop\", "{9DAFFDFD-1E82-43D0-A14E-0503098F47F3}") gives me a "Class not registered" error.

I can create an instance of the VisionCom server from a small Delphi program using the above GUID and get a return value from a method on the server so I know (well, pretty sure anyway) that I've created the server correctly. I'm thinking that I'm missing something additional that I need to do to allow VPF to create an instance.

I'm on the way out of the office now so if you reply and don't hear back from me, I'm not being rude - I'm just not around.

Regards,

Liam


>>>Hi All,
>>>
>>>Does anyone have any pointers to docs on writing a COM Server in Delphi for calling from VFP? There appears to be a dearth of documentation on the subject of Delphi COM programming in general. Any URLs gratefully received.
>>>
>>>Specifically, if anyone can tell me why I'm getting the "No such Interface Supported" error when I try to instantiate the server from VPF I'd be grateful.
>>>
>>>Although this is a Delphi COM topic, the COM server is for use by a VFP client so this post is actually ever-so-slightly on-topic.
>>>
>>>TIA
>>>
>>>Liam
>>Liam,
>>If VFP7 have you tried CreateObjectEx() ?
>>Oh in VFP6 too.
>>Cetin
>
>But DOC says 3rd parameter (CIID) is new to VFP7 - that would provide early binding thus preventing 'No such interface supported'
>Cetin
Liam O'Hagan
MCP VFP Desktop Apps
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform