<?xml version="1.0" encoding="utf-8"?>
<rss version="2.0" xmlns:atom="http://www.w3.org/2005/Atom">
	<channel>
		<title><![CDATA[Серый форум &mdash; OOo Basic: работа с Windows-технологиями (COM, Win32 API)]]></title>
		<link>http://forum.script-coding.com/viewtopic.php?id=2845</link>
		<atom:link href="http://forum.script-coding.com/extern.php?action=feed&amp;tid=2845&amp;type=rss" rel="self" type="application/rss+xml" />
		<description><![CDATA[Недавние сообщения в теме «OOo Basic: работа с Windows-технологиями (COM, Win32 API)».]]></description>
		<lastBuildDate>Wed, 25 Feb 2009 17:58:06 +0000</lastBuildDate>
		<generator>PunBB</generator>
		<item>
			<title><![CDATA[OOo Basic: работа с Windows-технологиями (COM, Win32 API)]]></title>
			<link>http://forum.script-coding.com/viewtopic.php?pid=20006#p20006</link>
			<description><![CDATA[<p>Если OpenOffice.org установлен под Windows, в макросах OOo Basic можно использовать некоторые Windows-технологии. Приёмы работы похожи на VBA в MS Office.</p><p>Пример работы с COM-объектом:<br /></p><div class="codebox"><pre><code>oleService = createUnoService(&quot;com.sun.star.bridge.OleObjectFactory&quot;)
IE = oleService.createInstance(&quot;InternetExplorer.Application&quot;)
IE.Visible = 1
IE.Navigate(&quot;http://www.openoffice.org&quot;)</code></pre></div><p>Пример объявления и вызова функции из внешней DLL (Win32 API):<br /></p><div class="codebox"><pre><code>Declare Function BeepAPI Lib &quot;kernel32&quot; Alias &quot;Beep&quot; (ByVal dwFreq As Long, ByVal dwDuration As Long) As Long
Sub Test()
    BeepAPI 200, 200
End Sub</code></pre></div>]]></description>
			<author><![CDATA[null@example.com (The gray Cardinal)]]></author>
			<pubDate>Wed, 25 Feb 2009 17:58:06 +0000</pubDate>
			<guid>http://forum.script-coding.com/viewtopic.php?pid=20006#p20006</guid>
		</item>
	</channel>
</rss>
