source/text/sbasic/shared/03104400.xhp | 12 ++-----
source/text/sbasic/shared/03104500.xhp | 20 +++--------
source/text/sbasic/shared/03104600.xhp | 10 ++---
source/text/sbasic/shared/03131500.xhp | 56 ++++++++++++++++-----------------
source/text/sbasic/shared/03131700.xhp | 8 +---
source/text/sbasic/shared/03131800.xhp | 8 +---
source/text/sbasic/shared/03132000.xhp | 12 ++-----
source/text/sbasic/shared/03132200.xhp | 13 +------
source/text/sbasic/shared/03132300.xhp | 14 +++-----
source/text/sbasic/shared/03132400.xhp | 17 ++--------
10 files changed, 66 insertions(+), 104 deletions(-)
New commits:
commit 9f558a9df14657cf549320364cb37f49b0f60c4d
Author: Olivier Hallot <olivier.hal...@libreoffice.org>
AuthorDate: Wed Jul 24 09:38:23 2019 -0300
Commit: Olivier Hallot <olivier.hal...@libreoffice.org>
CommitDate: Fri Jul 26 13:30:06 2019 +0200
Format some Basic UNO pages
Use css class 'code' for syntax of Basic statements
Use embeds for section title in pages
Change-Id: I54269e1cf995e1bc2921317bd4f4910d1c558733
Reviewed-on: https://gerrit.libreoffice.org/76264
Tested-by: Jenkins
Reviewed-by: Olivier Hallot <olivier.hal...@libreoffice.org>
diff --git a/source/text/sbasic/shared/03104400.xhp
b/source/text/sbasic/shared/03104400.xhp
index fd4273861..510b18fc2 100644
--- a/source/text/sbasic/shared/03104400.xhp
+++ b/source/text/sbasic/shared/03104400.xhp
@@ -36,18 +36,16 @@
<paragraph role="paragraph" id="par_id3151262" xml-lang="en-US">Tests if a
Basic Uno object supports certain Uno interfaces.</paragraph>
</section>
<paragraph role="paragraph" id="par_id3154232" xml-lang="en-US">Returns True,
if <emph>all</emph> stated Uno interfaces are supported, otherwise False is
returned.</paragraph>
-<paragraph role="heading" id="hd_id3150040" xml-lang="en-US"
level="2">Syntax:</paragraph>
-<bascode>
-<paragraph role="bascode" id="par_id3155555"
xml-lang="en-US">HasUnoInterfaces( oTest, Uno-Interface-Name 1 [,
Uno-Interface-Name 2, ...])</paragraph>
-</bascode>
-<paragraph role="heading" id="hd_id3153345" xml-lang="en-US" level="2">Return
value:</paragraph>
+<embed href="text/sbasic/shared/00000003.xhp#functsyntax"/>
+<paragraph role="code" id="par_id3155555" xml-lang="en-US">HasUnoInterfaces(
oTest, Uno-Interface-Name 1 [, Uno-Interface-Name 2, ...])</paragraph>
+<embed href="text/sbasic/shared/00000003.xhp#functvalue"/>
<paragraph role="paragraph" id="par_id3148538"
xml-lang="en-US">Bool</paragraph>
-<paragraph role="heading" id="hd_id3159157" xml-lang="en-US"
level="2">Parameters:</paragraph>
+<embed href="text/sbasic/shared/00000003.xhp#functparameters"/>
<paragraph role="paragraph" id="par_id3155419" xml-lang="en-US">
<emph>oTest:</emph> the Basic Uno object that you want to test.</paragraph>
<paragraph role="paragraph" id="par_id3149236" xml-lang="en-US">
<emph>Uno-Interface-Name:</emph> list of Uno interface names.</paragraph>
-<paragraph role="heading" id="hd_id3147574" xml-lang="en-US"
level="2">Example:</paragraph>
+<embed href="text/sbasic/shared/00000003.xhp#functexample"/>
<bascode>
<paragraph role="bascode" localize="false" id="par_id3149580"
xml-lang="en-US">bHas = HasUnoInterfaces( oTest,
"com.sun.star.beans.XIntrospection" )</paragraph>
</bascode>
diff --git a/source/text/sbasic/shared/03104500.xhp
b/source/text/sbasic/shared/03104500.xhp
index 99f9dd619..c97e8916f 100644
--- a/source/text/sbasic/shared/03104500.xhp
+++ b/source/text/sbasic/shared/03104500.xhp
@@ -24,32 +24,24 @@
<filename>/text/sbasic/shared/03104500.xhp</filename>
</topic>
</meta>
-
<body>
-
-
<section id="isunostruct">
<bookmark xml-lang="en-US" branch="index" id="bm_id3146117">
<bookmark_value>IsUnoStruct function</bookmark_value>
</bookmark>
-
-
<paragraph id="hd_id3146117" role="heading" level="1" xml-lang="en-US"><link
href="text/sbasic/shared/03104500.xhp" name="IsUnoStruct Function">IsUnoStruct
Function</link></paragraph>
<paragraph id="par_id3146957" role="paragraph" xml-lang="en-US">Returns True
if the given object is a Uno struct.</paragraph>
</section>
-<paragraph id="hd_id3148538" role="heading" level="2"
xml-lang="en-US">Syntax:</paragraph>
-<bascode>
-<paragraph id="par_id3155341" role="bascode" xml-lang="en-US">IsUnoStruct( Uno
type )</paragraph>
-</bascode>
-
-<paragraph id="hd_id3148473" role="heading" level="2" xml-lang="en-US">Return
value:</paragraph>
+<embed href="text/sbasic/shared/00000003.xhp#functsyntax"/>
+<paragraph id="par_id3155341" role="code" xml-lang="en-US">IsUnoStruct( Uno
type )</paragraph>
+<embed href="text/sbasic/shared/00000003.xhp#functvalue"/>
<paragraph id="par_id3145315" role="paragraph"
xml-lang="en-US">Bool</paragraph>
-<paragraph id="hd_id3145609" role="heading" level="2"
xml-lang="en-US">Parameters:</paragraph>
+<embed href="text/sbasic/shared/00000003.xhp#functparameters"/>
<paragraph id="par_id3148947" role="paragraph" xml-lang="en-US">Uno type : A
UnoObject</paragraph>
-<paragraph id="hd_id3156343" role="heading" level="2"
xml-lang="en-US">Example:</paragraph>
+<embed href="text/sbasic/shared/00000003.xhp#functexample"/>
<bascode>
<paragraph id="par_idm1341578272" role="bascode" localize="false"
xml-lang="en-US">Sub Main</paragraph>
<paragraph id="par_idm1341577040" role="bascode" localize="false"
xml-lang="en-US">Dim bIsStruct</paragraph>
@@ -68,4 +60,4 @@
</bascode>
</body>
-</helpdocument>
\ No newline at end of file
+</helpdocument>
diff --git a/source/text/sbasic/shared/03104600.xhp
b/source/text/sbasic/shared/03104600.xhp
index 0cb8cefa3..1339f6bc6 100644
--- a/source/text/sbasic/shared/03104600.xhp
+++ b/source/text/sbasic/shared/03104600.xhp
@@ -35,13 +35,11 @@
<paragraph role="heading" id="hd_id3149205" xml-lang="en-US" level="1"><link
href="text/sbasic/shared/03104600.xhp" name="EqualUnoObjects
Function">EqualUnoObjects Function</link></paragraph>
<paragraph role="paragraph" id="par_id3145090" xml-lang="en-US">Returns True
if the two specified Basic Uno objects represent the same Uno object
instance.</paragraph>
</section>
-<paragraph role="heading" id="hd_id3148538" xml-lang="en-US"
level="2">Syntax:</paragraph>
-<bascode>
-<paragraph role="bascode" localize="false" id="par_id3150669"
xml-lang="en-US">EqualUnoObjects( oObj1, oObj2 )</paragraph>
-</bascode>
-<paragraph role="heading" id="hd_id3150984" xml-lang="en-US" level="2">Return
value:</paragraph>
+<embed href="text/sbasic/shared/00000003.xhp#functsyntax"/>
+<paragraph role="code" localize="false" id="par_id3150669"
xml-lang="en-US">EqualUnoObjects( oObj1, oObj2 )</paragraph>
+<embed href="text/sbasic/shared/00000003.xhp#functvalue"/>
<paragraph role="paragraph" id="par_id3154285"
xml-lang="en-US">Bool</paragraph>
-<paragraph role="heading" id="hd_id3145315" xml-lang="en-US"
level="2">Example:</paragraph>
+<embed href="text/sbasic/shared/00000003.xhp#functexample"/>
<bascode>
<paragraph role="bascode" id="par_id3156024" xml-lang="en-US">' Copy of
objects -> same instance</paragraph>
<paragraph role="bascode" localize="false" id="par_id3154923"
xml-lang="en-US">oIntrospection = CreateUnoService(
"com.sun.star.beans.Introspection" )</paragraph>
diff --git a/source/text/sbasic/shared/03131500.xhp
b/source/text/sbasic/shared/03131500.xhp
index 3e8fde221..a249debd2 100644
--- a/source/text/sbasic/shared/03131500.xhp
+++ b/source/text/sbasic/shared/03131500.xhp
@@ -18,32 +18,32 @@
* the License at http://www.apache.org/licenses/LICENSE-2.0 .
-->
-<helpdocument version="1.0">
-<meta>
-<topic id="textsbasicshared03131500xml" indexer="include" status="PUBLISH">
-<title id="tit" xml-lang="en-US">CreateUnoStruct Function</title>
-<filename>/text/sbasic/shared/03131500.xhp</filename>
-</topic>
-<history>
-<created date="2003-10-31T00:00:00">Sun Microsystems, Inc.</created>
-</history>
-</meta>
-<body>
-<section id="createunostruct">
-<bookmark xml-lang="en-US" branch="index"
id="bm_id3150499"><bookmark_value>CreateUnoStruct function</bookmark_value>
-</bookmark>
-<paragraph role="heading" id="hd_id3150499" xml-lang="en-US" level="1"><link
href="text/sbasic/shared/03131500.xhp" name="CreateUnoStruct
Function">CreateUnoStruct Function</link></paragraph>
-<paragraph role="paragraph" id="par_id3150713" xml-lang="en-US"><ahelp
hid=".">Creates an instance of a Uno structure type.</ahelp></paragraph>
-</section>
-<paragraph role="paragraph" id="par_id3147226" xml-lang="en-US">Use the
following structure for your statement:</paragraph>
-<paragraph role="paragraph" id="par_id3149177" xml-lang="en-US">Dim oStruct as
new com.sun.star.beans.Property</paragraph>
-<paragraph role="heading" id="hd_id3156153" xml-lang="en-US"
level="2">Syntax:</paragraph>
-<bascode>
-<paragraph role="bascode" id="par_id3155341" xml-lang="en-US">oStruct =
CreateUnoStruct( Uno type name )</paragraph>
-</bascode>
-<paragraph role="heading" id="hd_id3145316" xml-lang="en-US"
level="2">Example:</paragraph>
-<bascode>
- <paragraph role="bascode" localize="false" id="par_id3149762"
xml-lang="en-US">oStruct = CreateUnoStruct( "com.sun.star.beans.Property"
)</paragraph>
-</bascode>
-</body>
+ <helpdocument version="1.0">
+ <meta>
+ <topic id="textsbasicshared03131500xml" indexer="include"
status="PUBLISH">
+ <title id="tit" xml-lang="en-US">CreateUnoStruct Function</title>
+ <filename>/text/sbasic/shared/03131500.xhp</filename>
+ </topic>
+ <history>
+ <created date="2003-10-31T00:00:00">Sun Microsystems,
Inc.</created>
+ </history>
+ </meta>
+ <body>
+ <section id="createunostruct">
+ <bookmark xml-lang="en-US" branch="index"
id="bm_id3150499"><bookmark_value>CreateUnoStruct function</bookmark_value>
+ </bookmark>
+ <h1 id="hd_id3150499"><link href="text/sbasic/shared/03131500.xhp"
name="CreateUnoStruct Function">CreateUnoStruct Function</link></h1>
+ <paragraph role="paragraph" id="par_id3150713"
xml-lang="en-US"><ahelp hid=".">Creates an instance of a Uno structure
type.</ahelp></paragraph>
+ </section>
+ <embed href="text/sbasic/shared/00000003.xhp#functsyntax"/>
+ <paragraph role="code" id="par_id3155341" xml-lang="en-US">oStruct =
CreateUnoStruct( Uno type name )</paragraph>
+ <embed href="text/sbasic/shared/00000003.xhp#functexample"/>
+ <bascode>
+ <paragraph role="bascode" localize="false" id="par_id3149762">oStruct
= CreateUnoStruct( "com.sun.star.beans.Property" )</paragraph>
+ </bascode>
+ <paragraph role="paragraph" id="par_id3147226" xml-lang="en-US">Or use
the following structure for your statement:</paragraph>
+ <bascode>
+ <paragraph role="bascode" id="par_id3149177" localize="false">Dim
oStruct as new com.sun.star.beans.Property</paragraph>
+ </bascode>
+ </body>
</helpdocument>
diff --git a/source/text/sbasic/shared/03131700.xhp
b/source/text/sbasic/shared/03131700.xhp
index be2b6e8e4..e04eac85d 100644
--- a/source/text/sbasic/shared/03131700.xhp
+++ b/source/text/sbasic/shared/03131700.xhp
@@ -37,11 +37,9 @@
<paragraph role="paragraph" id="par_id3156414" xml-lang="en-US">Returns the
ProcessServiceManager (central Uno ServiceManager).</paragraph>
</section>
<paragraph role="paragraph" id="par_id3145136" xml-lang="en-US">This function
is required when you want to instantiate a service using
CreateInstanceWithArguments.</paragraph>
-<paragraph role="heading" id="hd_id3153681" xml-lang="en-US"
level="2">Syntax:</paragraph>
-<bascode>
-<paragraph role="bascode" localize="false" id="par_id3151110"
xml-lang="en-US">oServiceManager = GetProcessServiceManager()</paragraph>
-</bascode>
-<paragraph role="heading" id="hd_id3149516" xml-lang="en-US"
level="2">Example:</paragraph>
+<embed href="text/sbasic/shared/00000003.xhp#functsyntax"/>
+<paragraph role="code" localize="false" id="par_id3151110"
xml-lang="en-US">oServiceManager = GetProcessServiceManager()</paragraph>
+<embed href="text/sbasic/shared/00000003.xhp#functexample"/>
<bascode>
<paragraph role="bascode" localize="false" id="par_id3143270"
xml-lang="en-US">oServiceManager = GetProcessServiceManager()</paragraph>
<paragraph role="bascode" localize="false" id="par_id3153825"
xml-lang="en-US">oIntrospection =
oServiceManager.createInstance("com.sun.star.beans.Introspection");</paragraph>
diff --git a/source/text/sbasic/shared/03131800.xhp
b/source/text/sbasic/shared/03131800.xhp
index 277d26ebb..26f71a677 100644
--- a/source/text/sbasic/shared/03131800.xhp
+++ b/source/text/sbasic/shared/03131800.xhp
@@ -39,11 +39,9 @@
</section>
<paragraph role="paragraph" id="par_id3153750" xml-lang="en-US">Dialogs are
defined in the dialog libraries. To display a dialog, a "live" dialog must be
created from the library.</paragraph>
<paragraph role="paragraph" id="par_id3153681" xml-lang="en-US">See <link
href="text/sbasic/guide/sample_code.xhp"
name="Examples">Examples</link>.</paragraph>
-<paragraph role="heading" id="hd_id3154286" xml-lang="en-US"
level="2">Syntax:</paragraph>
-<bascode>
-<paragraph role="bascode" localize="false" id="par_id3159176"
xml-lang="en-US">CreateUnoDialog( oDlgDesc )</paragraph>
-</bascode>
-<paragraph role="heading" id="hd_id3143270" xml-lang="en-US"
level="2">Example:</paragraph>
+<embed href="text/sbasic/shared/00000003.xhp#functsyntax"/>
+<paragraph role="code" localize="false" id="par_id3159176"
xml-lang="en-US">CreateUnoDialog( oDlgDesc )</paragraph>
+<embed href="text/sbasic/shared/00000003.xhp#functexample"/>
<bascode>
<paragraph id="par_id3159157" role="bascode" xml-lang="en-US">' Get dialog
description from the dialog library</paragraph>
<paragraph id="par_id3149234" role="bascode" localize="false"
xml-lang="en-US">oDlgDesc = DialogLibraries.Standard.Dialog1</paragraph>
diff --git a/source/text/sbasic/shared/03132000.xhp
b/source/text/sbasic/shared/03132000.xhp
index fe49b14b8..52664aaef 100644
--- a/source/text/sbasic/shared/03132000.xhp
+++ b/source/text/sbasic/shared/03132000.xhp
@@ -38,13 +38,9 @@
<paragraph id="par_id3149346" role="paragraph" xml-lang="en-US">Creates a
Listener instance.</paragraph>
</section>
<paragraph id="par_id3153681" role="paragraph" xml-lang="en-US">Many Uno
interfaces let you register listeners on a special listener interface. This
allows you to listen for specific events and call up the appropriate listener
method. The CreateUnoListener function waits for the called listener interface
and then passes the interface an object that the interface supports. This
object is then passed to the method to register the listener.</paragraph>
-
-<paragraph id="hd_id3148685" role="heading" level="2"
xml-lang="en-US">Syntax:</paragraph>
-<bascode>
-<paragraph id="par_id3143228" role="bascode" xml-lang="en-US">oListener =
CreateUnoListener( Prefixname, ListenerInterfaceName )</paragraph>
-</bascode>
-
-<paragraph id="hd_id3147574" role="heading" level="2"
xml-lang="en-US">Example:</paragraph>
+<embed href="text/sbasic/shared/00000003.xhp#functsyntax"/>
+<paragraph id="par_id3143228" role="code" xml-lang="en-US">oListener =
CreateUnoListener( Prefixname, ListenerInterfaceName )</paragraph>
+<embed href="text/sbasic/shared/00000003.xhp#functexample"/>
<paragraph id="par_id3154046" role="paragraph" xml-lang="en-US">The following
example is based on a Basic library object.</paragraph>
<bascode>
<paragraph id="par_idm1340547456" role="bascode" localize="false"
xml-lang="en-US">Dim oListener</paragraph>
@@ -132,4 +128,4 @@
<paragraph id="par_id3150940" role="warning" xml-lang="en-US">Listener methods
must <emph>always</emph> be implemented to avoid Basic run-time
errors.</paragraph>
</body>
-</helpdocument>
\ No newline at end of file
+</helpdocument>
diff --git a/source/text/sbasic/shared/03132200.xhp
b/source/text/sbasic/shared/03132200.xhp
index e01e2baf5..a4f19ddae 100644
--- a/source/text/sbasic/shared/03132200.xhp
+++ b/source/text/sbasic/shared/03132200.xhp
@@ -26,23 +26,17 @@
</meta>
<body>
-
<section id="thiscomponent">
<bookmark xml-lang="en-US" branch="index" id="bm_id3155342">
<bookmark_value>ThisComponent property</bookmark_value>
<bookmark_value>components;addressing</bookmark_value>
</bookmark>
-
<paragraph id="hd_id3155342" role="heading" level="1" xml-lang="en-US"><link
href="text/sbasic/shared/03132200.xhp" name="ThisComponent
Statement">ThisComponent Statement</link></paragraph>
<paragraph id="par_id3154923" role="paragraph" xml-lang="en-US">Addresses the
active component so that its properties can be read and set. ThisComponent is
used from document Basic, where it represents the document the Basic belongs
to. The type of object accessed by ThisComponent depends on the document
type.<comment>see i60932</comment></paragraph>
</section>
-
-<paragraph id="hd_id3154346" role="heading" level="2"
xml-lang="en-US">Syntax:</paragraph>
-<bascode>
-<paragraph id="par_id3151056" role="bascode" localize="false"
xml-lang="en-US">ThisComponent</paragraph>
-</bascode>
-
-<paragraph id="hd_id3154940" role="heading" level="2"
xml-lang="en-US">Example:</paragraph>
+<embed href="text/sbasic/shared/00000003.xhp#functsyntax"/>
+<paragraph id="par_id3151056" role="code" localize="false"
xml-lang="en-US">ThisComponent</paragraph>
+<embed href="text/sbasic/shared/00000003.xhp#functexample"/>
<bascode>
<paragraph id="par_idm1341584928" role="bascode" localize="false"
xml-lang="en-US">Sub Main</paragraph>
<paragraph id="par_id3154123" role="bascode" xml-lang="en-US">' updates the
"Table of Contents" in a text doc</paragraph>
@@ -54,5 +48,4 @@
<paragraph id="par_idm1341574608" role="bascode" localize="false"
xml-lang="en-US">End Sub</paragraph>
</bascode>
</body>
-
</helpdocument>
diff --git a/source/text/sbasic/shared/03132300.xhp
b/source/text/sbasic/shared/03132300.xhp
index b3b356f6b..e405a5a3e 100644
--- a/source/text/sbasic/shared/03132300.xhp
+++ b/source/text/sbasic/shared/03132300.xhp
@@ -37,13 +37,11 @@
</section>
<paragraph role="paragraph" id="par_id3143267" xml-lang="en-US">This object is
automatically converted to an Any of the corresponding type when passed to Uno.
The type must be specified by its fully qualified Uno type name.</paragraph>
<paragraph role="note" id="par_id3153626" xml-lang="en-US">The $[officename]
API frequently uses the Any type. It is the counterpart of the Variant type
known from other environments. The Any type holds one arbitrary Uno type and is
used in generic Uno interfaces.</paragraph>
-<paragraph role="heading" id="hd_id3147560" xml-lang="en-US"
level="2">Syntax:</paragraph>
-<bascode>
-<paragraph role="bascode" id="par_id3154760" xml-lang="en-US">oUnoValue =
CreateUnoValue( "[]byte", MyBasicValue ) ' to get a byte sequence.</paragraph>
-</bascode>
-<paragraph role="paragraph" id="par_id3150541" xml-lang="en-US">If
CreateUnoValue cannot be converted to the specified Uno type, and error occurs.
For the conversion, the TypeConverter service is used.</paragraph>
-<paragraph role="paragraph" id="par_id3153524" xml-lang="en-US">This function
is intended for use in situations where the default Basic to Uno type
converting mechanism is insufficient. This can happen when you try to access
generic Any based interfaces, such as XPropertySet::setPropertyValue( Name,
Value ) or X???Container::insertBy???( ???, Value ), from $[officename] Basic.
The Basic runtime does not recognize these types as they are only defined in
the corresponding service.</paragraph>
-<paragraph role="paragraph" id="par_id3154366" xml-lang="en-US">In this type
of situation, $[officename] Basic chooses the best matching type for the Basic
type that you want to convert. However, if the wrong type is selected, an error
occurs. You use the CreateUnoValue() function to create a value for the unknown
Uno type.</paragraph>
-<paragraph role="paragraph" id="par_id3150769" xml-lang="en-US">You can also
use this function to pass non-Any values, but this is not recommend. If Basic
already knows the target type, using the CreateUnoValue() function will only
lead to additional converting operations that slow down the Basic
execution.</paragraph>
+<embed href="text/sbasic/shared/00000003.xhp#functsyntax"/>
+<paragraph role="code" id="par_id3154760" xml-lang="en-US">oUnoValue =
CreateUnoValue( "[]byte", MyBasicValue ) ' to get a byte sequence.</paragraph>
+<paragraph role="paragraph" id="par_id3150541" xml-lang="en-US">If
<literal>CreateUnoValue</literal> cannot be converted to the specified Uno
type, and error occurs. For the conversion, the
<literal>TypeConverter</literal> service is used.</paragraph>
+<paragraph role="paragraph" id="par_id3153524" xml-lang="en-US">This function
is intended for use in situations where the default Basic to Uno type
converting mechanism is insufficient. This can happen when you try to access
generic Any based interfaces, such as <literal>XPropertySet::setPropertyValue(
Name, Value )</literal> or <literal>X???Container::insertBy???( ???, Value
)</literal>, from $[officename] Basic. The Basic runtime does not recognize
these types as they are only defined in the corresponding service.</paragraph>
+<paragraph role="paragraph" id="par_id3154366" xml-lang="en-US">In this type
of situation, $[officename] Basic chooses the best matching type for the Basic
type that you want to convert. However, if the wrong type is selected, an error
occurs. You use the <literal>CreateUnoValue()</literal> function to create a
value for the unknown Uno type.</paragraph>
+<paragraph role="paragraph" id="par_id3150769" xml-lang="en-US">You can also
use this function to pass non-Any values, but this is not recommend. If Basic
already knows the target type, using the <literal>CreateUnoValue()</literal>
function will only lead to additional converting operations that slow down the
Basic execution.</paragraph>
</body>
</helpdocument>
diff --git a/source/text/sbasic/shared/03132400.xhp
b/source/text/sbasic/shared/03132400.xhp
index 7d46fdc92..32c3b0573 100644
--- a/source/text/sbasic/shared/03132400.xhp
+++ b/source/text/sbasic/shared/03132400.xhp
@@ -26,25 +26,17 @@
</meta>
<body>
-
-
<section id="createobject">
<bookmark xml-lang="en-US" branch="index" id="bm_id659810">
<bookmark_value>CreateObject function</bookmark_value>
</bookmark>
-
-
<paragraph id="par_idN10580" role="heading" level="1" xml-lang="en-US"><link
href="text/sbasic/shared/03132400.xhp">CreateObject Function</link></paragraph>
<paragraph id="par_idN10590" role="paragraph" xml-lang="en-US"><ahelp
hid=".">Creates a UNO object. On Windows, can also create OLE
objects.</ahelp><comment>see i70942</comment></paragraph>
<paragraph id="par_idN1059F" role="paragraph" xml-lang="en-US">This method
creates instances of the type that is passed as parameter.</paragraph>
</section>
-
-<paragraph id="par_idN105A2" role="heading" level="2"
xml-lang="en-US">Syntax:</paragraph>
-<bascode>
-<paragraph id="par_idN105A6" role="bascode" xml-lang="en-US">oObj =
CreateObject( type )</paragraph>
-</bascode>
-
-<paragraph id="par_idN105A9" role="heading" level="2"
xml-lang="en-US">Example:</paragraph>
+<embed href="text/sbasic/shared/00000003.xhp#functsyntax"/>
+<paragraph id="par_idN105A6" role="code" xml-lang="en-US">oObj = CreateObject(
type )</paragraph>
+<embed href="text/sbasic/shared/00000003.xhp#functexample"/>
<bascode>
<paragraph id="par_idm1341251920" role="bascode" localize="false"
xml-lang="en-US">Type address</paragraph>
<paragraph id="par_idm1341250688" role="bascode" localize="false"
xml-lang="en-US"> Name1 As String</paragraph>
@@ -57,5 +49,4 @@
<paragraph id="par_idm1341242016" role="bascode" localize="false"
xml-lang="en-US">End Sub</paragraph>
</bascode>
</body>
-
-</helpdocument>
\ No newline at end of file
+</helpdocument>
_______________________________________________
Libreoffice-commits mailing list
libreoffice-comm...@lists.freedesktop.org
https://lists.freedesktop.org/mailman/listinfo/libreoffice-commits
