/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */ /* * This file is part of the LibreOffice project. * * This Source Code Form is subject to the terms of the Mozilla Public * License, v. 2.0. If a copy of the MPL was not distributed with this * file, You can obtain one at http://mozilla.org/MPL/2.0/. * * This file incorporates work covered by the following license notice: * * Licensed to the Apache Software Foundation (ASF) under one or more * contributor license agreements. See the NOTICE file distributed * with this work for additional information regarding copyright * ownership. The ASF licenses this file to you under the Apache * License, Version 2.0 (the "License"); you may not use this file * except in compliance with the License. You may obtain a copy of * the License at http://www.apache.org/licenses/LICENSE-2.0 . */ #include #include #include #include #include #include #include "runtime.hxx" #include "stdobj.hxx" #include "rtlproto.hxx" #include class SvRTLInputBox : public ModalDialog { VclPtr aEdit; VclPtr aOk; VclPtr aCancel; VclPtr aPromptText; OUString aText; void PositionDialog( long nXTwips, long nYTwips, const Size& rDlgSize ); void InitButtons( const Size& rDlgSize ); void PositionEdit( const Size& rDlgSize ); void PositionPrompt( const OUString& rPrompt, const Size& rDlgSize ); DECL_LINK( OkHdl, Button * ); DECL_LINK( CancelHdl, Button * ); public: SvRTLInputBox( vcl::Window* pParent, const OUString& rPrompt, const OUString& rTitle, const OUString& rDefault, long nXTwips = -1, long nYTwips = -1 ); virtual ~SvRTLInputBox() { disposeOnce(); } virtual void dispose() SAL_OVERRIDE; OUString GetText() const SAL_OVERRIDE { return aText; } }; SvRTLInputBox::SvRTLInputBox( vcl::Window* pParent, const OUString& rPrompt, const OUString& rTitle, const OUString& rDefault, long nXTwips, long nYTwips ) : ModalDialog( pParent,WB_3DLOOK | WB_MOVEABLE | WB_CLOSEABLE ), aEdit( VclPtr::Create(this, WB_LEFT | WB_BORDER) ), aOk( new OKButton(this) ), aCancel( new CancelButton(this) ), aPromptText( VclPtr::Create(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 ); vcl::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::dispose() { aEdit.disposeAndClear(); aOk.disposeAndClear(); aCancel.disposeAndClear(); aPromptText.disposeAndClear(); ModalDialog::dispose(); } 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 OUString& rPrompt,const Size& rDlgSize) { if ( rPrompt.isEmpty() ) return; OUString aText_(convertLineEnd(rPrompt, 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.clear(); 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_uInt32 nArgCount = rPar.Count(); if ( nArgCount < 2 ) StarBASIC::Error( SbERR_BAD_ARGUMENT ); else { OUString aTitle; OUString aDefault; sal_Int32 nX = -1, nY = -1; // center const OUString& rPrompt = rPar.Get(1)->GetOUString(); if ( nArgCount > 2 && !rPar.Get(2)->IsErr() ) aTitle = rPar.Get(2)->GetOUString(); if ( nArgCount > 3 && !rPar.Get(3)->IsErr() ) aDefault = rPar.Get(3)->GetOUString(); if ( nArgCount > 4 ) { if ( nArgCount != 6 ) { StarBASIC::Error( SbERR_BAD_ARGUMENT ); return; } nX = rPar.Get(4)->GetLong(); nY = rPar.Get(5)->GetLong(); } VclPtrInstance pDlg(Application::GetDefDialogParent(), rPrompt,aTitle,aDefault,nX,nY); pDlg->Execute(); rPar.Get(0)->PutString( pDlg->GetText() ); } } /* vim:set shiftwidth=4 softtabstop=4 expandtab: */ distro/lhm/libreoffice-7-5+backports LibreOffice 核心代码仓库文档基金会
summaryrefslogtreecommitdiff
path: root/extras
AgeCommit message (Expand)Author
2016-02-24update emoji autocorrect files from po-filesChristian Lohmaier
2016-02-10update emoji autocorrect files from po-filesChristian Lohmaier
2016-02-08tdf#95024 Update Hungarian Autocorrect patternsLászló Németh
2016-02-03Update Hungarian Autotext patternsLászló Németh
2016-02-02tdf#97439 Enhance pt-PT autocorrect fileMarco A. G. Pinto
2016-01-27update emoji autocorrect files from po-filesChristian Lohmaier
2016-01-13update emoji autocorrect files from po-filesChristian Lohmaier
2015-12-15update emoji autocorrect files from po-filesChristian Lohmaier
2015-11-25update emoji autocorrect files from po-filesRobinson Tryon
2015-11-20tdf#95916 Update Alizarin.otpLaurent Balland-Poirier
2015-11-17tdf#34882 Adding hex and decimal code searchSteve Hart
2015-11-10update emoji autocorrect files from po-filesChristian Lohmaier
2015-10-18update emoji autocorrect files from po-filesRobinson Tryon
2015-09-11tdf#93957 fix Emoji pattern of horizontal ellipsisLászló Németh
2015-09-03update emoji autocorrect entries from po-filesChristian Lohmaier
2015-09-02tdf#93233 fix clockface emoji entriesChristian Lohmaier
2015-09-01add sfxlo-TemplateLocalView to glade catalogCaolán McNamara
2015-08-28use nonet for xsltprocCaolán McNamara
2015-08-22Remove bogus ligatures from OpenSymbol fontKhaled Hosny
2015-08-18tdf#93302: Fix OpenSymbol %phi and %varphi glyphsKhaled Hosny
2015-08-12update emoji autocorrect entries from po-filesChristian Lohmaier
2015-07-31update emoji autocorrect entries from po-filesChristian Lohmaier
2015-07-24update emoji autocorrect entries from po-filesChristian Lohmaier
2015-07-21add Slovenian Emoji shortcodesLászló Németh
2015-07-16add localized Emoji short namesLászló Németh
2015-06-07Resolves: tdf#89905 don't copy palettes from shared to userCaolán McNamara
2015-06-01Add translation support for short names of Emoji and other symbolsLászló Németh
2015-05-22add Greek small letters to the technical spelling dictionaryLászló Németh
2015-05-20AutoCorrect: Emoji support (hu)László Németh
2015-05-20AutoCorrect: Emoji support (en-US)László Németh
2015-05-07Clipart - PNG files optimized.Andrew
2015-05-05add some missing glade prototypesCaolán McNamara
2015-04-22add some default style presets to templatesTomaž Vajngerl
2015-04-20Add "eg." and "ie." to the English sentence exception listsLászló Németh