strepsirrhini/office-gobmx
9
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions
office-gobmx/automation/source/miniapp/testapp.cxx
Jens-Heiner Rechtien cf1360d6c6 INTEGRATION: CWS warnings01 (1.4.10); FILE MERGED 
2006/03/08 15:34:39 gh 1.4.10.3: remove wntmsci warnings
2006/03/02 08:08:43 gh 1.4.10.2: removing warnings for linux and solarisSparc and some windows
2006/02/02 09:19:55 gh 1.4.10.1: removed compiler warnings
2006-06-19 23:21:47 +00:00

372 lines
11 KiB
C++
Raw Blame History

/*************************************************************************
*
* OpenOffice.org - a multi-platform office productivity suite
*
* $RCSfile: testapp.cxx,v $
*
* $Revision: 1.5 $
*
* last change: $Author: hr $ $Date: 2006-06-20 00:21:47 $
*
* The Contents of this file are made available subject to
* the terms of GNU Lesser General Public License Version 2.1.
*
*
* GNU Lesser General Public License Version 2.1
* =============================================
* Copyright 2005 by Sun Microsystems, Inc.
* 901 San Antonio Road, Palo Alto, CA 94303, USA
*
* This library is free software; you can redistribute it and/or
* modify it under the terms of the GNU Lesser General Public
* License version 2.1, as published by the Free Software Foundation.
*
* This library 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
* Lesser General Public License for more details.
*
* You should have received a copy of the GNU Lesser General Public
* License along with this library; if not, write to the Free Software
* Foundation, Inc., 59 Temple Place, Suite 330, Boston,
* MA 02111-1307 USA
*
************************************************************************/
#ifndef _SVT_FILEDLG_HXX //autogen
#include <svtools/filedlg.hxx>
#endif
#include <stdio.h>
#ifndef _MSGBOX_HXX //autogen
#include <vcl/msgbox.hxx>
#endif
#ifndef _DEBUG_HXX //autogen
#include <tools/debug.hxx>
#endif
#ifndef SVTOOLS_TESTTOOL_HXX //autogen
#include <svtools/testtool.hxx>
#endif
#ifndef _SVTOOLS_TTPROPS_HXX // handmade
#include <svtools/ttprops.hxx>
#endif
#ifndef _RTL_USTRING_HXX_
#include <rtl/ustring.hxx>
#endif
#ifndef _RTL_USTRBUF_HXX_
#include <rtl/ustrbuf.hxx>
#endif
#ifndef _OSL_PROCESS_H_
#include <osl/process.h>
#endif
#include <ucbhelper/contentbroker.hxx>
#include <ucbhelper/configurationkeys.hxx>
#ifndef _COMPHELPER_REGPATHHELPER_HXX_
#include <comphelper/regpathhelper.hxx>
#endif
#ifndef _COMPHELPER_PROCESSFACTORY_HXX_
#include <comphelper/processfactory.hxx>
#endif
#include <cppuhelper/servicefactory.hxx>
#include <com/sun/star/registry/XImplementationRegistration.hpp>
#include <com/sun/star/lang/XMultiServiceFactory.hpp>
#include <com/sun/star/ucb/XContentProviderManager.hpp>
#include "servres.hrc"
#include "servres.hxx"
#include "testapp.hxx"
using namespace comphelper;
using namespace cppu;
using namespace rtl;
using namespace com::sun::star::uno;
using namespace com::sun::star::lang;
using namespace com::sun::star::registry;
using namespace com::sun::star::ucb;
MainWindow::MainWindow(MyApp *pAppl)
: WorkWindow(NULL, WB_STDWORK)
, pApp(pAppl)
{}
IMPL_LINK(MainWindow,MenuSelectHdl,MenuBar*,aMenu)
{
return pApp->GetDispatcher()->ExecuteFunction(aMenu->GetCurItemId());
}
void MainWindow::FileOpen()
{
FileDialog Dlg(this,WB_OPEN );
Dlg.AddFilter(CUniString("Alle Dateien"), CUniString("*.*"));
Dlg.SetCurFilter (CUniString("*.*"));
if (Dlg.Execute() == RET_OK)
{
new EditFileWindow(this,Dlg.GetPath());
}
}
void MainWindow::TestGross()
{
ModalDialogGROSSER_TEST_DLG Dlg(this,ResId(GROSSER_TEST_DLG));
if (Dlg.Execute() == RET_OK)
{
}
}
BOOL MainWindow::Close()
{
WorkWindow::Close();
FileExit();
return TRUE;
}
void MainWindow::FileExit()
{
/* WriteSTBProfile();*/
// if (pApp->CloseAll())
pApp->Quit();
}
void MainWindow::Tree(GHEditWindow *aEditWin, Window *pBase, USHORT Indent)
{
String sIndent,aText;
sIndent.Expand(5*Indent);
aText = pBase->GetText();
aText.SearchAndReplaceAllAscii("\n",CUniString("\\n"));
aEditWin->AddText(String(sIndent).AppendAscii("Text: ").Append(aText).AppendAscii("\n"));
aEditWin->AddText(String(sIndent).AppendAscii("Help: ").Append(String::CreateFromInt64(pBase->GetHelpId())).AppendAscii(":").Append(pBase->GetQuickHelpText()).AppendAscii(":").Append(pBase->GetHelpText()).AppendAscii("\n"));
USHORT i;
for (i = 0 ; i < pBase->GetChildCount() ; i++)
{
Tree(aEditWin,pBase->GetChild(i),Indent+1);
}
}
void MainWindow::WinTree()
{
GHEditWindow * aEditWin = new GHEditWindow(this,CUniString("Window Tree"));
Tree(aEditWin,this,0);
}
void MainWindow::SysDlg()
{
switch (QueryBox(this,WB_YES_NO_CANCEL | WB_DEF_YES, CUniString("Want to open another Dialog?")).Execute())
{
case RET_YES:
while ( WarningBox(this,WB_OK_CANCEL | WB_DEF_OK,CUniString("Well this is the last box now!")).Execute() == RET_OK );
break;
case RET_NO:
break;
case RET_CANCEL:InfoBox(this,CUniString("Oh well..")).Execute();
break;
}
/*
#define WB_OK ((WinBits)0x0010)
#define WB_OK_CANCEL ((WinBits)0x0020)
#define WB_YES_NO ((WinBits)0x0040)
#define WB_YES_NO_CANCEL ((WinBits)0x0080)
#define WB_RETRY_CANCEL ((WinBits)0x0100)
#define WB_DEF_OK ((WinBits)0x0200)
#define WB_DEF_CANCEL ((WinBits)0x0400)
#define WB_DEF_RETRY ((WinBits)0x0800)
#define WB_DEF_YES ((WinBits)0x1000)
#define WB_DEF_NO ((WinBits)0x2000)
#define RET_OK TRUE
#define RET_CANCEL FALSE
#define RET_YES 2
#define RET_NO 3
#define RET_RETRY 4
*/
}
MyApp aApp;
MyApp::MyApp()
{
pMainWin = NULL;
}
void MyApp::Property( ApplicationProperty& rProp )
{
TTProperties* pTTProperties = PTR_CAST( TTProperties, &rProp );
if ( pTTProperties )
{
pTTProperties->nPropertyVersion = TT_PROPERTIES_VERSION;
switch ( pTTProperties->nActualPR )
{
/* case TT_PR_SLOTS:
{
pTTProperties->nSidOpenUrl = SID_OPENURL;
pTTProperties->nSidFileName = SID_FILE_NAME;
pTTProperties->nSidNewDocDirect = SID_NEWDOCDIRECT;
pTTProperties->nSidCopy = SID_COPY;
pTTProperties->nSidPaste = SID_PASTE;
pTTProperties->nSidSourceView = SID_SOURCEVIEW;
pTTProperties->nSidSelectAll = SID_SELECTALL;
pTTProperties->nSidReferer = SID_REFERER;
pTTProperties->nActualPR = 0;
}
break;*/
case TT_PR_DISPATCHER:
{
PlugInDispatcher* pDispatcher = GetDispatcher();
if ( !pDispatcher )
pTTProperties->nActualPR = TT_PR_ERR_NODISPATCHER;
else
{
pDispatcher->SetExecuteMode(EXECUTEMODE_DIALOGASYNCHRON);
if ( pDispatcher->ExecuteFunction(
pTTProperties->mnSID, pTTProperties->mppArgs, pTTProperties->mnMode )
== EXECUTE_NO )
pTTProperties->nActualPR = TT_PR_ERR_NOEXECUTE;
else
pTTProperties->nActualPR = 0;
}
}
break;
/* case TT_PR_IMG:
{
SvDataMemberObjectRef aDataObject = new SvDataMemberObject();
SvData* pDataBmp = new SvData( FORMAT_BITMAP );
pDataBmp->SetData( pTTProperties->mpBmp );
aDataObject->Append( pDataBmp );
aDataObject->CopyClipboard();
pTTProperties->nActualPR = 0;
}
break;*/
default:
{
pTTProperties->nPropertyVersion = 0;
}
}
return;
}
}
USHORT MyDispatcher::ExecuteFunction( USHORT nSID, SfxPoolItem** ppArgs, USHORT nMode)
{
(void) ppArgs; /* avoid warning about unused parameter */
(void) nMode; /* avoid warning about unused parameter */
switch (nSID)
{
case IDM_FILE_EXIT: pMainWin->FileExit(); break;
case IDM_FILE_OPEN_TEST: pMainWin->FileOpen(); break;
case IDM_TEST_GROSS: pMainWin->TestGross(); break;
case IDM_TEST_WINTREE: pMainWin->WinTree(); break;
case IDM_SYS_DLG: pMainWin->SysDlg(); break;
default:
{
DBG_ERROR1("Dispatcher kennt Funktion nicht %s",ByteString::CreateFromInt64(nSID).GetBuffer());
return EXECUTE_NO;
}
}
return EXECUTE_YES;
}
PlugInDispatcher* MyApp::GetDispatcher()
{
return pMyDispatcher;
}
Reference< XContentProviderManager > InitializeUCB( void )
{
OUString path;
if( osl_Process_E_None != osl_getExecutableFile( (rtl_uString**)&path ) )
{
InfoBox( NULL, String::CreateFromAscii( "Couldn't retrieve directory of executable" ) ).Execute();
exit( 1 );
}
OSL_ASSERT( path.lastIndexOf( '/' ) >= 0 );
::rtl::OUStringBuffer bufServices( path.copy( 0, path.lastIndexOf( '/' )+1 ) );
bufServices.appendAscii("services.rdb");
OUString services = bufServices.makeStringAndClear();
::rtl::OUStringBuffer bufTypes( path.copy( 0, path.lastIndexOf( '/' )+1 ) );
bufTypes.appendAscii("types.rdb");
OUString types = bufTypes.makeStringAndClear();
Reference< XMultiServiceFactory > xSMgr;
try
{
xSMgr = createRegistryServiceFactory( types, services, sal_True );
}
catch( com::sun::star::uno::Exception & exc )
{
fprintf( stderr, "Couldn't bootstrap uno servicemanager for reason : %s\n" ,
OUStringToOString( exc.Message, RTL_TEXTENCODING_ASCII_US ).getStr() );
InfoBox( NULL, String( exc.Message ) ).Execute();
throw ;
}
//////////////////////////////////////////////////////////////////////
// set global factory
setProcessServiceFactory( xSMgr );
// Create unconfigured Ucb:
Sequence< Any > aArgs;
ucb::ContentBroker::initialize( xSMgr, aArgs );
Reference< XContentProviderManager > xUcb =
ucb::ContentBroker::get()->getContentProviderManagerInterface();
Reference< XContentProvider > xFileProvider
( xSMgr->createInstance( OUString::createFromAscii( "com.sun.star.ucb.FileContentProvider" ) ), UNO_QUERY );
xUcb->registerContentProvider( xFileProvider, OUString::createFromAscii( "file" ), sal_True );
return xUcb;
}
void MyApp::Main()
{
Reference< XContentProviderManager > xUcb = InitializeUCB();
LanguageType aRequestedLanguage;
aRequestedLanguage = LanguageType( LANGUAGE_GERMAN );
AllSettings aSettings = GetSettings();
aSettings.SetUILanguage( aRequestedLanguage );
aSettings.SetLanguage( aRequestedLanguage );
SetSettings( aSettings );
Resource::SetResManager( CREATEVERSIONRESMGR( tma ) );
MainWindow MainWin(this);
pMainWin = &MainWin;
MenuBar aMenu(ResId(MENU_CLIENT));
MainWin.SetMenuBar( &aMenu );
aMenu.GetPopupMenu( IDM_FILE )->SetSelectHdl(LINK(&MainWin, MainWindow, MenuSelectHdl));
aMenu.GetPopupMenu( IDM_TEST )->SetSelectHdl(LINK(&MainWin, MainWindow, MenuSelectHdl));
MyDispatcher MyDsp(pMainWin);
pMyDispatcher = &MyDsp;
MainWin.SetText(CUniString("Star Division Test Tool Client Window"));
MainWin.Show();
RemoteControl aRC;
Execute();
}
Reference in a new issue View git blame Copy permalink