svn commit: r1206948 - in /incubator/ooo/ooo-site/trunk/content/ui/sample_macros: ./ picklistsize.html

Sun, 27 Nov 2011 16:46:32 -0800 

Author: kschenk
Date: Mon Nov 28 00:46:07 2011
New Revision: 1206948

URL: http://svn.apache.org/viewvc?rev=1206948&view=rev
Log:
kls -- added ui/sample_macros


Added:
    incubator/ooo/ooo-site/trunk/content/ui/sample_macros/
    incubator/ooo/ooo-site/trunk/content/ui/sample_macros/picklistsize.html   
(with props)

Added: incubator/ooo/ooo-site/trunk/content/ui/sample_macros/picklistsize.html
URL: 
http://svn.apache.org/viewvc/incubator/ooo/ooo-site/trunk/content/ui/sample_macros/picklistsize.html?rev=1206948&view=auto
==============================================================================
--- incubator/ooo/ooo-site/trunk/content/ui/sample_macros/picklistsize.html 
(added)
+++ incubator/ooo/ooo-site/trunk/content/ui/sample_macros/picklistsize.html Mon 
Nov 28 00:46:07 2011
@@ -0,0 +1,42 @@
+<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 3.2//EN">
+<HTML>
+<HEAD>
+       <META HTTP-EQUIV="CONTENT-TYPE" CONTENT="text/html; 
charset=windows-1252">
+       <TITLE></TITLE>
+       <META NAME="GENERATOR" CONTENT="StarOffice 6.0  (Win32)">
+       <META NAME="AUTHOR" CONTENT="Frank Sch&ouml;nheit">
+       <META NAME="CREATED" CONTENT="20020521;17590645">
+       <META NAME="CHANGEDBY" CONTENT="Frank Sch&ouml;nheit">
+       <META NAME="CHANGED" CONTENT="20020521;18322198">
+</HEAD>
+<BODY LANG="en-US">
+<PRE><FONT COLOR="#c0c0c0">REM  *****  BASIC  *****</FONT>
+
+<FONT COLOR="#008000"><FONT COLOR="#000080">Option</FONT> <FONT 
COLOR="#000080">Explicit</FONT></FONT>
+
+<FONT COLOR="#008000"><FONT COLOR="#000080">Sub</FONT> Main</FONT>
+<FONT COLOR="#008000">        ChangePickListSize( <FONT 
COLOR="#ff0000">10</FONT> )</FONT>
+<FONT COLOR="#008000"><FONT COLOR="#000080">End</FONT> <FONT 
COLOR="#000080">Sub</FONT></FONT>
+
+<FONT COLOR="#008000"><FONT COLOR="#000080">Sub</FONT> ChangePickListSize( 
nSize <FONT COLOR="#000080">as</FONT> <FONT COLOR="#000080">Integer</FONT> 
)</FONT>
+<FONT COLOR="#008000">        <FONT COLOR="#c0c0c0">' access the global 
configuration provider</FONT></FONT>
+<FONT COLOR="#008000">        <FONT COLOR="#000080">Dim </FONT>aConfigProvider 
<FONT COLOR="#000080">As</FONT> Object</FONT>
+<FONT COLOR="#008000">        aConfigProvider = createUnoService( <FONT 
COLOR="#ff0000">&quot;com.sun.star.configuration.ConfigurationProvider&quot;</FONT>
 )</FONT>
+<FONT COLOR="#008000">        </FONT>
+<FONT COLOR="#008000">        <FONT COLOR="#c0c0c0">' create an access object 
for the history node</FONT></FONT>
+<FONT COLOR="#008000">        <FONT COLOR="#000080">Dim</FONT> 
aHistorySettings <FONT COLOR="#000080">As</FONT> Object</FONT>
+<FONT COLOR="#008000">        <FONT COLOR="#000080">Dim</FONT> aParams(<FONT 
COLOR="#ff0000">0</FONT>) <FONT COLOR="#000080">As</FONT> <FONT 
COLOR="#000080">new</FONT> com.sun.star.beans.PropertyValue</FONT>
+<FONT COLOR="#008000">        aParams(<FONT COLOR="#ff0000">0</FONT>).Name = 
<FONT COLOR="#ff0000">&quot;nodepath&quot;</FONT></FONT>
+<FONT COLOR="#008000">        aParams(<FONT COLOR="#ff0000">0</FONT>).Value = 
<FONT 
COLOR="#ff0000">&quot;/org.openoffice.Office.Common/History&quot;</FONT></FONT>
+<FONT COLOR="#008000">        aHistorySettings = 
aConfigProvider.createInstanceWithArguments( _</FONT>
+<FONT COLOR="#008000">                <FONT 
COLOR="#ff0000">&quot;com.sun.star.configuration.ConfigurationUpdateAccess&quot;</FONT>,
 _</FONT>
+<FONT COLOR="#008000">                aParams() )</FONT>
+<FONT COLOR="#008000">        </FONT>
+<FONT COLOR="#008000">        <FONT COLOR="#c0c0c0">' set the pick list 
size</FONT></FONT>
+<FONT COLOR="#008000">        aHistorySettings.replaceByName( <FONT 
COLOR="#ff0000">&quot;PickListSize&quot;</FONT>, nSize )</FONT>
+<FONT COLOR="#008000">        </FONT>
+<FONT COLOR="#008000">        <FONT COLOR="#c0c0c0">' commit the changes 
done</FONT></FONT>
+<FONT COLOR="#008000">        aHistorySettings.commitChanges</FONT>
+<FONT COLOR="#008000"><FONT COLOR="#000080">End</FONT> <FONT 
COLOR="#000080">Sub</FONT></FONT></PRE>
+</BODY>
+</HTML>
\ No newline at end of file

Propchange: 
incubator/ooo/ooo-site/trunk/content/ui/sample_macros/picklistsize.html
------------------------------------------------------------------------------
    svn:eol-style = native

Reply via email to