update dev300-m57
[ooovba.git] / lotuswordpro / source / filter / lwpverdocument.cxx
blobe252bbee403287d9df88efc708251dcaaf52630f
1 /*************************************************************************
3 * The Contents of this file are made available subject to the terms of
4 * either of the following licenses
6 * - GNU Lesser General Public License Version 2.1
7 * - Sun Industry Standards Source License Version 1.1
9 * Sun Microsystems Inc., October, 2000
11 * GNU Lesser General Public License Version 2.1
12 * =============================================
13 * Copyright 2000 by Sun Microsystems, Inc.
14 * 901 San Antonio Road, Palo Alto, CA 94303, USA
16 * This library is free software; you can redistribute it and/or
17 * modify it under the terms of the GNU Lesser General Public
18 * License version 2.1, as published by the Free Software Foundation.
20 * This library is distributed in the hope that it will be useful,
21 * but WITHOUT ANY WARRANTY; without even the implied warranty of
22 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
23 * Lesser General Public License for more details.
25 * You should have received a copy of the GNU Lesser General Public
26 * License along with this library; if not, write to the Free Software
27 * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
28 * MA 02111-1307 USA
31 * Sun Industry Standards Source License Version 1.1
32 * =================================================
33 * The contents of this file are subject to the Sun Industry Standards
34 * Source License Version 1.1 (the "License"); You may not use this file
35 * except in compliance with the License. You may obtain a copy of the
36 * License at http://www.openoffice.org/license.html.
38 * Software provided under this License is provided on an "AS IS" basis,
39 * WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING,
40 * WITHOUT LIMITATION, WARRANTIES THAT THE SOFTWARE IS FREE OF DEFECTS,
41 * MERCHANTABLE, FIT FOR A PARTICULAR PURPOSE, OR NON-INFRINGING.
42 * See the License for the specific provisions governing your rights and
43 * obligations concerning the Software.
45 * The Initial Developer of the Original Code is: IBM Corporation
47 * Copyright: 2008 by IBM Corporation
49 * All Rights Reserved.
51 * Contributor(s): _______________________________________
54 ************************************************************************/
55 /*************************************************************************
56 * @file
57 * Versioned Pointer object, used for VO_VEGTR and VO_QTR
58 * Does not find the difference between CVersionedQointer and
59 * CVersionedGointer, so use one class
60 ************************************************************************/
61 /*************************************************************************
62 * Change History
63 Jun 2005 Created
64 ************************************************************************/
65 #include "lwpglobalmgr.hxx"
66 #include "lwpverdocument.hxx"
67 #include "lwplnopts.hxx"
68 #include "lwpproplist.hxx"
69 #include "xfilter/xfparastyle.hxx"
70 #include "lwptools.hxx"
72 LwpVerDocument::LwpVerDocument(LwpObjectHeader& objHdr, LwpSvStream* pStrm)
73 : LwpObject(objHdr, pStrm)
76 void LwpVerDocument::Read()
78 m_nTabSpacing = m_pObjStrm->QuickReaduInt32();
80 if (m_pObjStrm->CheckExtra())
82 LwpLineNumberOptions aLineNumberOptions(m_pObjStrm);
84 if (m_pObjStrm->CheckExtra())
86 LwpPropList aPropList;
87 aPropList.Read(m_pObjStrm);
88 m_pObjStrm->SkipExtra();
93 void LwpVerDocument::RegisterStyle()
95 XFDefaultParaStyle* pDefault = new XFDefaultParaStyle;
96 double len =(double) m_nTabSpacing/UNITS_PER_INCH*CM_PER_INCH;
97 if(len < 0.001)
99 len = 1.27; //0.5 inch
101 pDefault->SetTabDistance(len);
102 XFStyleManager* pXFStyleManager = LwpGlobalMgr::GetInstance()->GetXFStyleManager();
103 pXFStyleManager->AddStyle(pDefault);
106 sal_uInt32 LwpVerDocument::GetTabSpacing()
108 return m_nTabSpacing;