[fpc-pascal] support forusinganactivex

Roberto Padovani padovani.r at gmail.com
Fri May 27 16:03:48 CEST 2011


2011/5/27 Ludo Brands <ludo.brands at free.fr>:
> There is no standard way of getting the information directly from the
> activex object. You can ask your collegues to implement these properties
> (should be straightforeward).

Last time I (hardware engineer) asked for a minor change in a library,
they estimated 2 years work.
For every electronic board I design, I also write 3 or 4 software to
test it, so I'm sure it was a minor change.

> For activex objects that are installed on your computer you can find the
> info here:
> HKEY_CLASSES_ROOT\CLSID\clsid-of-your-object\    (helpstring)
> HKEY_CLASSES_ROOT\CLSID\clsid-of-your-object\version\   (version)
>

I'll go for the registry! Thanks!

> Ludo
>
>
> -----Message d'origine-----
> De : fpc-pascal-bounces at lists.freepascal.org
> [mailto:fpc-pascal-bounces at lists.freepascal.org] De la part de Roberto
> Padovani
> Envoyé : vendredi 27 mai 2011 13:47
> À : FPC-Pascal users discussions
> Objet : Re: RE : RE : RE : RE : RE : RE : RE : RE : [fpc-pascal] support
> forusinganactivex
>
>
> It's nearly finished and nearly working.
> I was wondering this: is there a way to query the version and helpstring of
> an activex, once I created it ?
>
> R#
>
> 2011/5/26 Ludo Brands <ludo.brands at free.fr>:
>> GetActiveOleObject raises EOleSysError if it fails.
>>
>> -----Message d'origine-----
>> De : fpc-pascal-bounces at lists.freepascal.org
>> [mailto:fpc-pascal-bounces at lists.freepascal.org] De la part de Roberto
>> Padovani Envoyé : jeudi 26 mai 2011 17:32
>> À : FPC-Pascal users discussions
>> Objet : Re: RE : RE : RE : RE : RE : RE : RE : [fpc-pascal] support for
>> usinganactivex
>>
>>
>> Wow, thanks again for the explanation and the example!
>> I'm working on that....and it starts beating....
>>
>> By the way, after this:
>>
>> FDevice := GetActiveOleObject(OLE_OBJECT_NAME);
>>
>> how can i test that everything is ok and FDevice is valid ? something
>> like:
>>
>> ok := FDevice <> nil;
>>
>> Roberto
>>
>> 2011/5/26 Ludo Brands <ludo.brands at free.fr>:
>>> Attached a small lazarus demo project that implements the EventSink
>>> unit. It is based on the EventSink unit in the article and adapted
>>> for fpc. The demo launches Msword and connects to the
>>> ApplicationEvents interface {000209F7-0000-0000-C000-000000000046}.
>>> When you create a new document, or change document, close word etc.
>>> in msword the app displays in a memo the dispids received through the
>>> event sink.
>>>
>>> As you will notice, the dispinterface for the events interface just
>>> contains the guid. No method prototypes are required.
>>>
>>> Ludo
>>>
>>>
>>> _______________________________________________
>>> fpc-pascal maillist  -  fpc-pascal at lists.freepascal.org
>>> http://lists.freepascal.org/mailman/listinfo/fpc-pascal
>>>
>> _______________________________________________
>> fpc-pascal maillist  -  fpc-pascal at lists.freepascal.org
>> http://lists.freepascal.org/mailman/listinfo/fpc-pascal
>>
>> _______________________________________________
>> fpc-pascal maillist  -  fpc-pascal at lists.freepascal.org
>> http://lists.freepascal.org/mailman/listinfo/fpc-pascal
>>
> _______________________________________________
> fpc-pascal maillist  -  fpc-pascal at lists.freepascal.org
> http://lists.freepascal.org/mailman/listinfo/fpc-pascal
>
> _______________________________________________
> fpc-pascal maillist  -  fpc-pascal at lists.freepascal.org
> http://lists.freepascal.org/mailman/listinfo/fpc-pascal
>



More information about the fpc-pascal mailing list