196 lines
6.1 KiB
C++
196 lines
6.1 KiB
C++
/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
|
|
/*************************************************************************
|
|
*
|
|
* DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
|
|
*
|
|
* Copyright 2000, 2010 Oracle and/or its affiliates.
|
|
*
|
|
* OpenOffice.org - a multi-platform office productivity suite
|
|
*
|
|
* This file is part of OpenOffice.org.
|
|
*
|
|
* OpenOffice.org is free software: you can redistribute it and/or modify
|
|
* it under the terms of the GNU Lesser General Public License version 3
|
|
* only, as published by the Free Software Foundation.
|
|
*
|
|
* OpenOffice.org 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 version 3 for more details
|
|
* (a copy is included in the LICENSE file that accompanied this code).
|
|
*
|
|
* You should have received a copy of the GNU Lesser General Public License
|
|
* version 3 along with OpenOffice.org. If not, see
|
|
* <http://www.openoffice.org/license.html>
|
|
* for a copy of the LGPLv3 License.
|
|
*
|
|
************************************************************************/
|
|
|
|
// MARKER(update_precomp.py): autogen include statement, do not remove
|
|
#include "precompiled_basic.hxx"
|
|
|
|
#include <vcl/button.hxx>
|
|
#include <vcl/fixed.hxx>
|
|
#include <vcl/edit.hxx>
|
|
#include <vcl/dialog.hxx>
|
|
#include <vcl/svapp.hxx>
|
|
#include "runtime.hxx"
|
|
#include "stdobj.hxx"
|
|
#include "rtlproto.hxx"
|
|
|
|
class SvRTLInputBox : public ModalDialog
|
|
{
|
|
Edit aEdit;
|
|
OKButton aOk;
|
|
CancelButton aCancel;
|
|
FixedText aPromptText;
|
|
String aText;
|
|
|
|
void PositionDialog( long nXTwips, long nYTwips, const Size& rDlgSize );
|
|
void InitButtons( const Size& rDlgSize );
|
|
void PositionEdit( const Size& rDlgSize );
|
|
void PositionPrompt( const String& rPrompt, const Size& rDlgSize );
|
|
DECL_LINK( OkHdl, Button * );
|
|
DECL_LINK( CancelHdl, Button * );
|
|
|
|
public:
|
|
SvRTLInputBox( Window* pParent, const String& rPrompt, const String& rTitle,
|
|
const String& rDefault, long nXTwips = -1, long nYTwips = -1 );
|
|
String GetText() const { return aText; }
|
|
};
|
|
|
|
SvRTLInputBox::SvRTLInputBox( Window* pParent, const String& rPrompt,
|
|
const String& rTitle, const String& rDefault,
|
|
long nXTwips, long nYTwips ) :
|
|
ModalDialog( pParent,WB_3DLOOK | WB_MOVEABLE | WB_CLOSEABLE ),
|
|
aEdit( this, WB_LEFT | WB_BORDER ),
|
|
aOk( this ), aCancel( this ), aPromptText( this, WB_WORDBREAK )
|
|
{
|
|
SetMapMode( MapMode( MAP_APPFONT ) );
|
|
Size aDlgSizeApp( 280, 80 );
|
|
PositionDialog( nXTwips, nYTwips, aDlgSizeApp );
|
|
InitButtons( aDlgSizeApp );
|
|
PositionEdit( aDlgSizeApp );
|
|
PositionPrompt( rPrompt, aDlgSizeApp );
|
|
aOk.Show();
|
|
aCancel.Show();
|
|
aEdit.Show();
|
|
aPromptText.Show();
|
|
SetText( rTitle );
|
|
Font aFont( GetFont());
|
|
Color aColor( GetBackground().GetColor() );
|
|
aFont.SetFillColor( aColor );
|
|
aEdit.SetFont( aFont );
|
|
aEdit.SetText( rDefault );
|
|
aEdit.SetSelection( Selection( SELECTION_MIN, SELECTION_MAX ) );
|
|
}
|
|
|
|
void SvRTLInputBox::InitButtons( const Size& rDlgSize )
|
|
{
|
|
aOk.SetSizePixel( LogicToPixel( Size( 45, 15) ));
|
|
aCancel.SetSizePixel( LogicToPixel( Size( 45, 15) ));
|
|
Point aPos( rDlgSize.Width()-45-10, 5 );
|
|
aOk.SetPosPixel( LogicToPixel( Point(aPos) ));
|
|
aPos.Y() += 16;
|
|
aCancel.SetPosPixel( LogicToPixel( Point(aPos) ));
|
|
aOk.SetClickHdl(LINK(this,SvRTLInputBox, OkHdl));
|
|
aCancel.SetClickHdl(LINK(this,SvRTLInputBox,CancelHdl));
|
|
}
|
|
|
|
void SvRTLInputBox::PositionDialog(long nXTwips, long nYTwips, const Size& rDlgSize)
|
|
{
|
|
SetSizePixel( LogicToPixel(rDlgSize) );
|
|
if( nXTwips != -1 && nYTwips != -1 )
|
|
{
|
|
Point aDlgPosApp( nXTwips, nYTwips );
|
|
SetPosPixel( LogicToPixel( aDlgPosApp, MAP_TWIP ) );
|
|
}
|
|
}
|
|
|
|
void SvRTLInputBox::PositionEdit( const Size& rDlgSize )
|
|
{
|
|
aEdit.SetPosPixel( LogicToPixel( Point( 5,rDlgSize.Height()-35)));
|
|
aEdit.SetSizePixel( LogicToPixel( Size(rDlgSize.Width()-15,12)));
|
|
}
|
|
|
|
|
|
void SvRTLInputBox::PositionPrompt(const String& rPrompt,const Size& rDlgSize)
|
|
{
|
|
if ( rPrompt.Len() == 0 )
|
|
return;
|
|
String aText_( rPrompt );
|
|
aText_.ConvertLineEnd( LINEEND_CR );
|
|
aPromptText.SetPosPixel( LogicToPixel(Point(5,5)));
|
|
aPromptText.SetText( aText_ );
|
|
Size aSize( rDlgSize );
|
|
aSize.Width() -= 70;
|
|
aSize.Height() -= 50;
|
|
aPromptText.SetSizePixel( LogicToPixel(aSize));
|
|
}
|
|
|
|
|
|
IMPL_LINK_INLINE_START( SvRTLInputBox, OkHdl, Button *, pButton )
|
|
{
|
|
(void)pButton;
|
|
|
|
aText = aEdit.GetText();
|
|
EndDialog( 1 );
|
|
return 0;
|
|
}
|
|
IMPL_LINK_INLINE_END( SvRTLInputBox, OkHdl, Button *, pButton )
|
|
|
|
IMPL_LINK_INLINE_START( SvRTLInputBox, CancelHdl, Button *, pButton )
|
|
{
|
|
(void)pButton;
|
|
|
|
aText.Erase();
|
|
EndDialog( 0 );
|
|
return 0;
|
|
}
|
|
IMPL_LINK_INLINE_END( SvRTLInputBox, CancelHdl, Button *, pButton )
|
|
|
|
|
|
// *********************************************************************
|
|
// *********************************************************************
|
|
|
|
// Syntax: String InputBox( Prompt, [Title], [Default] [, nXpos, nYpos ] )
|
|
|
|
RTLFUNC(InputBox)
|
|
{
|
|
(void)pBasic;
|
|
(void)bWrite;
|
|
|
|
sal_uIntPtr nArgCount = rPar.Count();
|
|
if ( nArgCount < 2 )
|
|
StarBASIC::Error( SbERR_BAD_ARGUMENT );
|
|
else
|
|
{
|
|
String aTitle;
|
|
String aDefault;
|
|
sal_Int32 nX = -1, nY = -1; // zentrieren
|
|
const String& rPrompt = rPar.Get(1)->GetString();
|
|
if ( nArgCount > 2 && !rPar.Get(2)->IsErr() )
|
|
aTitle = rPar.Get(2)->GetString();
|
|
if ( nArgCount > 3 && !rPar.Get(3)->IsErr() )
|
|
aDefault = rPar.Get(3)->GetString();
|
|
if ( nArgCount > 4 )
|
|
{
|
|
if ( nArgCount != 6 )
|
|
{
|
|
StarBASIC::Error( SbERR_BAD_ARGUMENT );
|
|
return;
|
|
}
|
|
nX = rPar.Get(4)->GetLong();
|
|
nY = rPar.Get(5)->GetLong();
|
|
}
|
|
SvRTLInputBox *pDlg=new SvRTLInputBox(GetpApp()->GetDefDialogParent(),
|
|
rPrompt,aTitle,aDefault,nX,nY);
|
|
pDlg->Execute();
|
|
rPar.Get(0)->PutString( pDlg->GetText() );
|
|
delete pDlg;
|
|
}
|
|
}
|
|
|
|
|
|
|
|
/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
|