You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
136 lines
3.7 KiB
136 lines
3.7 KiB
/*
|
|
* Copyright (c) 2005 Cyrille Berger <cberger@cberger.net>
|
|
* Copyright (c) 2006 Isaac Clerencia <isaac@warp.es>
|
|
*
|
|
* This program is free software; you can redistribute it and/or modify
|
|
* it under the terms of the GNU Library General Public License as published by
|
|
* the Free Software Foundation; either version 2 of the License, or
|
|
* (at your option) any later version.
|
|
*
|
|
* This program is distributed in the hope that it will be useful,
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
* GNU Library General Public License for more details.
|
|
*
|
|
* You should have received a copy of the GNU Library General Public License
|
|
* along with this program; if not, write to the Free Software
|
|
* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
|
|
*/
|
|
|
|
#include "krs_doc.h"
|
|
#include "krs_sheet.h"
|
|
|
|
#include <kspread_map.h>
|
|
#include <kspread_sheet.h>
|
|
|
|
namespace Kross { namespace KSpreadCore {
|
|
|
|
Doc::Doc(KSpread::Doc* doc)
|
|
: Kross::Api::Class<Doc>("KSpreadDocument"), m_doc(doc)
|
|
{
|
|
this->addFunction0< Sheet >("currentSheet", this, &Doc::currentSheet);
|
|
this->addFunction1< Sheet, Kross::Api::Variant >("sheetByName", this, &Doc::sheetByName);
|
|
this->addFunction0< Kross::Api::Variant >("sheetNames", this, &Doc::sheetNames);
|
|
|
|
this->addFunction1< Kross::Api::Variant, Kross::Api::Variant >("addSheet", this, &Doc::addSheet);
|
|
this->addFunction1< Kross::Api::Variant, Kross::Api::Variant >("removeSheet", this, &Doc::removeSheet);
|
|
|
|
this->addFunction1< Kross::Api::Variant, Kross::Api::Variant >("loadNativeXML", this, &Doc::loadNativeXML);
|
|
this->addFunction0< Kross::Api::Variant >("saveNativeXML", this, &Doc::saveNativeXML);
|
|
|
|
this->addFunction1< Kross::Api::Variant, Kross::Api::Variant >("openUrl", this, &Doc::openUrl);
|
|
this->addFunction1< Kross::Api::Variant, Kross::Api::Variant >("saveUrl", this, &Doc::saveUrl);
|
|
this->addFunction1< Kross::Api::Variant, Kross::Api::Variant >("import", this, &Doc::import);
|
|
this->addFunction1< Kross::Api::Variant, Kross::Api::Variant >("exp0rt", this, &Doc::exp0rt);
|
|
|
|
}
|
|
|
|
Doc::~Doc() {
|
|
|
|
}
|
|
|
|
const TQString Doc::getClassName() const {
|
|
return "Kross::KSpreadCore::Doc";
|
|
}
|
|
|
|
Sheet* Doc::currentSheet()
|
|
{
|
|
return new Sheet(m_doc->displaySheet(), m_doc);
|
|
}
|
|
|
|
Sheet* Doc::sheetByName(const TQString& name)
|
|
{
|
|
TQPtrListIterator<KSpread::Sheet> it (m_doc->map()->sheetList());
|
|
for( ; it.current(); ++it )
|
|
if(it.current()->sheetName() == name)
|
|
return new Sheet(it.current(), m_doc);
|
|
return 0;
|
|
}
|
|
|
|
TQStringList Doc::sheetNames()
|
|
{
|
|
TQStringList names;
|
|
TQPtrListIterator<KSpread::Sheet> it (m_doc->map()->sheetList());
|
|
for( ; it.current(); ++it )
|
|
names.append( it.current()->sheetName() );
|
|
return names;
|
|
}
|
|
|
|
bool Doc::addSheet(const TQString& sheetname)
|
|
{
|
|
KSpread::Sheet* sheet = m_doc->map()->createSheet();
|
|
if(sheet) {
|
|
if(! sheet->setSheetName(sheetname)) {
|
|
delete sheet;
|
|
return false;
|
|
}
|
|
m_doc->map()->addSheet(sheet);
|
|
return true;
|
|
}
|
|
return false;
|
|
}
|
|
|
|
bool Doc::removeSheet(const TQString& sheetname)
|
|
{
|
|
KSpread::Sheet* sheet = m_doc->map()->findSheet(sheetname);
|
|
if(sheet) {
|
|
m_doc->map()->takeSheet(sheet);
|
|
return true;
|
|
}
|
|
return false;
|
|
}
|
|
|
|
bool Doc::loadNativeXML(const TQString& xml) {
|
|
TQDomDocument doc;
|
|
if(! doc.setContent(xml, true))
|
|
return false;
|
|
return m_doc->loadXML(0, doc);
|
|
}
|
|
|
|
TQString Doc::saveNativeXML() {
|
|
return m_doc->saveXML().toString(2);
|
|
}
|
|
|
|
bool Doc::openUrl(const TQString& url)
|
|
{
|
|
return m_doc->openURL(url);
|
|
}
|
|
|
|
bool Doc::saveUrl(const TQString& url)
|
|
{
|
|
return m_doc->saveAs(url);
|
|
}
|
|
|
|
bool Doc::import(const TQString& url)
|
|
{
|
|
return m_doc->import(url);
|
|
}
|
|
|
|
bool Doc::exp0rt(const TQString& url)
|
|
{
|
|
return m_doc->exp0rt(url);
|
|
}
|
|
|
|
}}
|
|
|