<div dir="ltr"><div dir="ltr">Hi James,<div><br></div><div>I am not familiar with variants and Ole objects, sorry about that. I found some people using code with Ole objects and it that seems to work, can you chack if it applies to your case?</div><div><br></div><div><a href="https://stackoverflow.com/questions/17970573/using-word-ole-in-lazarus-freepascal">https://stackoverflow.com/questions/17970573/using-word-ole-in-lazarus-freepascal</a><br></div><div><br></div><div>Best,</div><div>R</div></div><br><div class="gmail_quote"><div dir="ltr" class="gmail_attr">On Sun, Jun 25, 2023 at 2:25 PM <<a href="mailto:fpc-pascal-request@lists.freepascal.org">fpc-pascal-request@lists.freepascal.org</a>> wrote:<br></div><blockquote class="gmail_quote" style="margin:0px 0px 0px 0.8ex;border-left:1px solid rgb(204,204,204);padding-left:1ex">Send fpc-pascal mailing list submissions to<br>
<a href="mailto:fpc-pascal@lists.freepascal.org" target="_blank">fpc-pascal@lists.freepascal.org</a><br>
<br>
To subscribe or unsubscribe via the World Wide Web, visit<br>
<a href="https://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal" rel="noreferrer" target="_blank">https://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal</a><br>
or, via email, send a message with subject or body 'help' to<br>
<a href="mailto:fpc-pascal-request@lists.freepascal.org" target="_blank">fpc-pascal-request@lists.freepascal.org</a><br>
<br>
You can reach the person managing the list at<br>
<a href="mailto:fpc-pascal-owner@lists.freepascal.org" target="_blank">fpc-pascal-owner@lists.freepascal.org</a><br>
<br>
When replying, please edit your Subject line so it is more specific<br>
than "Re: Contents of fpc-pascal digest..."<br>
<br>
<br>
Today's Topics:<br>
<br>
1. Re: Microsoft SAPI on Freepascal (Rafael Pican?o)<br>
2. Re: SDL2 Event Registration (and case statements)<br>
(Rafael Pican?o)<br>
3. Re: Microsoft SAPI on Freepascal (Rafael Pican?o)<br>
4. Re: Microsoft SAPI on Freepascal (James Richters)<br>
<br>
<br>
----------------------------------------------------------------------<br>
<br>
Message: 1<br>
Date: Sun, 25 Jun 2023 13:33:24 -0300<br>
From: Rafael Pican?o <<a href="mailto:cpicanco42@gmail.com" target="_blank">cpicanco42@gmail.com</a>><br>
To: <a href="mailto:fpc-pascal@lists.freepascal.org" target="_blank">fpc-pascal@lists.freepascal.org</a><br>
Subject: Re: [fpc-pascal] Microsoft SAPI on Freepascal<br>
Message-ID:<br>
<CAGpuCi712ve6bRsXdVn=y7cFTuMSWSw4K2ewe65yu1F=<a href="mailto:H9mkDQ@mail.gmail.com" target="_blank">H9mkDQ@mail.gmail.com</a>><br>
Content-Type: text/plain; charset="utf-8"<br>
<br>
Hi James,<br>
<br>
> SpVoice : Variant;<br>
> SpVoice := CreateOleObject('SAPI.SpVoice')<br>
<br>
The Free Pascal Variant type does not handle interfaces by default. Take a<br>
look:<br>
<br>
<a href="https://wiki.freepascal.org/Variant" rel="noreferrer" target="_blank">https://wiki.freepascal.org/Variant</a><br>
<br>
Best,<br>
R<br>
-------------- next part --------------<br>
An HTML attachment was scrubbed...<br>
URL: <<a href="http://lists.freepascal.org/pipermail/fpc-pascal/attachments/20230625/ae39a571/attachment-0001.htm" rel="noreferrer" target="_blank">http://lists.freepascal.org/pipermail/fpc-pascal/attachments/20230625/ae39a571/attachment-0001.htm</a>><br>
<br>
------------------------------<br>
<br>
Message: 2<br>
Date: Sun, 25 Jun 2023 13:42:00 -0300<br>
From: Rafael Pican?o <<a href="mailto:cpicanco42@gmail.com" target="_blank">cpicanco42@gmail.com</a>><br>
To: <a href="mailto:fpc-pascal@lists.freepascal.org" target="_blank">fpc-pascal@lists.freepascal.org</a><br>
Subject: Re: [fpc-pascal] SDL2 Event Registration (and case<br>
statements)<br>
Message-ID:<br>
<CAGpuCi4Dq6PkNs=xz3Vsy=ppwNVe-BdSad8oTVg=+<a href="mailto:HSjvO9ptg@mail.gmail.com" target="_blank">HSjvO9ptg@mail.gmail.com</a>><br>
Content-Type: text/plain; charset="utf-8"<br>
<br>
Thanks Guilhermo,<br>
<br>
Just to clarify, I do have a limited number of events. Lets say, 2 events.<br>
So, using the SDL_RegisterEvents function, is it possible to define these<br>
two new events as normal constants so they will be known at compile time<br>
and will make Free Pascal case statements happy?<br>
<br>
Best,<br>
R<br>
-------------- next part --------------<br>
An HTML attachment was scrubbed...<br>
URL: <<a href="http://lists.freepascal.org/pipermail/fpc-pascal/attachments/20230625/c9a4b1e9/attachment-0001.htm" rel="noreferrer" target="_blank">http://lists.freepascal.org/pipermail/fpc-pascal/attachments/20230625/c9a4b1e9/attachment-0001.htm</a>><br>
<br>
------------------------------<br>
<br>
Message: 3<br>
Date: Sun, 25 Jun 2023 13:52:17 -0300<br>
From: Rafael Pican?o <<a href="mailto:cpicanco42@gmail.com" target="_blank">cpicanco42@gmail.com</a>><br>
To: <a href="mailto:fpc-pascal@lists.freepascal.org" target="_blank">fpc-pascal@lists.freepascal.org</a><br>
Subject: Re: [fpc-pascal] Microsoft SAPI on Freepascal<br>
Message-ID:<br>
<<a href="mailto:CAGpuCi4jAaQDqNRvjgoNEZAOS61mVuF-Okabx92BM9stjO2poA@mail.gmail.com" target="_blank">CAGpuCi4jAaQDqNRvjgoNEZAOS61mVuF-Okabx92BM9stjO2poA@mail.gmail.com</a>><br>
Content-Type: text/plain; charset="utf-8"<br>
<br>
Hi James,<br>
<br>
Sorry, I missed the following reference:<br>
<br>
"Remark Dispatch interface support for variants is currently broken in the<br>
compiler." (<a href="https://www.freepascal.org/docs-html/ref/refsu20.html" rel="noreferrer" target="_blank">https://www.freepascal.org/docs-html/ref/refsu20.html</a>)<br>
<br>
Best,<br>
R<br>
<br>
><br>
-------------- next part --------------<br>
An HTML attachment was scrubbed...<br>
URL: <<a href="http://lists.freepascal.org/pipermail/fpc-pascal/attachments/20230625/08ee32d3/attachment-0001.htm" rel="noreferrer" target="_blank">http://lists.freepascal.org/pipermail/fpc-pascal/attachments/20230625/08ee32d3/attachment-0001.htm</a>><br>
<br>
------------------------------<br>
<br>
Message: 4<br>
Date: Sun, 25 Jun 2023 13:24:46 -0400<br>
From: "James Richters" <<a href="mailto:james.richters@productionautomation.net" target="_blank">james.richters@productionautomation.net</a>><br>
To: <<a href="mailto:cpicanco42@gmail.com" target="_blank">cpicanco42@gmail.com</a>>, "'FPC-Pascal users discussions'"<br>
<<a href="mailto:fpc-pascal@lists.freepascal.org" target="_blank">fpc-pascal@lists.freepascal.org</a>><br>
Subject: Re: [fpc-pascal] Microsoft SAPI on Freepascal<br>
Message-ID: <015d01d9a789$f1097fb0$d31c7f10$@<a href="http://productionautomation.net" rel="noreferrer" target="_blank">productionautomation.net</a>><br>
Content-Type: text/plain; charset="utf-8"<br>
<br>
So it?s broken? It seems like the link you provided is trying to show a workaround, but I don?t know how I could apply that.<br>
<br>
>"Remark Dispatch interface support for variants is currently broken in the compiler." (<a href="https://www.freepascal.org/docs-html/ref/refsu20.html" rel="noreferrer" target="_blank">https://www.freepascal.org/docs-html/ref/refsu20.html</a>)<br>
<br>
<br>
-------------- next part --------------<br>
An HTML attachment was scrubbed...<br>
URL: <<a href="http://lists.freepascal.org/pipermail/fpc-pascal/attachments/20230625/c33bf375/attachment.htm" rel="noreferrer" target="_blank">http://lists.freepascal.org/pipermail/fpc-pascal/attachments/20230625/c33bf375/attachment.htm</a>><br>
<br>
------------------------------<br>
<br>
Subject: Digest Footer<br>
<br>
_______________________________________________<br>
fpc-pascal maillist - <a href="mailto:fpc-pascal@lists.freepascal.org" target="_blank">fpc-pascal@lists.freepascal.org</a><br>
<a href="https://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal" rel="noreferrer" target="_blank">https://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal</a><br>
<br>
<br>
------------------------------<br>
<br>
End of fpc-pascal Digest, Vol 228, Issue 30<br>
*******************************************<br>
</blockquote></div></div>