svx/source/form/tbxform.cxx

   1 /* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
   2 /*
   3  * This file is part of the LibreOffice project.
   4  *
   5  * This Source Code Form is subject to the terms of the Mozilla Public
   6  * License, v. 2.0. If a copy of the MPL was not distributed with this
   7  * file, You can obtain one at http://mozilla.org/MPL/2.0/.
   8  *
   9  * This file incorporates work covered by the following license notice:
  10  *
  11  *   Licensed to the Apache Software Foundation (ASF) under one or more
  12  *   contributor license agreements. See the NOTICE file distributed
  13  *   with this work for additional information regarding copyright
  14  *   ownership. The ASF licenses this file to you under the Apache
  15  *   License, Version 2.0 (the "License"); you may not use this file
  16  *   except in compliance with the License. You may obtain a copy of
  17  *   the License at http://www.apache.org/licenses/LICENSE-2.0 .
  18  */
  19
  20 #include <string>
  21 #include <svl/intitem.hxx>
  22 #include <svl/eitem.hxx>
  23 #include <svl/stritem.hxx>
  24 #include <sfx2/dispatch.hxx>
  25 #include <vcl/toolbox.hxx>
  26 #include <vcl/fixed.hxx>
  27 #include <vcl/settings.hxx>
  28 #include "fmitems.hxx"
  29 #include "formtoolbars.hxx"
  30
  31
  32 #include <svx/dialmgr.hxx>
  33 #include <svx/dialogs.hrc>
  34 #include "svx/tbxctl.hxx"
  35 #include "tbxform.hxx"
  36 #include "svx/fmresids.hrc"
  37 #include "fmhelp.hrc"
  38 #include <sfx2/viewfrm.hxx>
  39 #include <sfx2/viewsh.hxx>
  40 #include <sfx2/imagemgr.hxx>
  41 #include <com/sun/star/beans/XPropertySet.hpp>
  42
  43 using namespace ::com::sun::star::uno;
  44 using namespace ::com::sun::star::beans;
  45 using namespace ::com::sun::star::frame;
  46 using ::com::sun::star::beans::XPropertySet;
  47
  48 SvxFmAbsRecWin::SvxFmAbsRecWin( vcl::Window* _pParent, SfxToolBoxControl* _pController )
  49     :NumericField( _pParent, WB_BORDER )
  50     ,m_pController(_pController)
  51 {
  52     SetMin(1);
  53     SetFirst(1);
  54     SetSpinSize(1);
  55     SetSizePixel( Size(70,19) );
  56
  57     SetDecimalDigits(0);
  58     SetStrictFormat(true);
  59 }
  60
  61
  62 void SvxFmAbsRecWin::FirePosition( bool _bForce )
  63 {
  64     if ( _bForce || IsValueChangedFromSaved() )
  65     {
  66         sal_Int64 nRecord = GetValue();
  67         if (nRecord < GetMin() || nRecord > GetMax())
  68         {
  69             return;
  70         }
  71
  72         SfxInt32Item aPositionParam( FN_PARAM_1, static_cast<sal_Int32>(nRecord) );
  73
  74         Any a;
  75         Sequence< PropertyValue > aArgs( 1 );
  76         aArgs[0].Name = "Position";
  77         aPositionParam.QueryValue( a );
  78         aArgs[0].Value = a;
  79         m_pController->Dispatch( OUString( ".uno:AbsoluteRecord" ),
  80                                  aArgs );
  81         m_pController->updateStatus();
  82
  83         SaveValue();
  84     }
  85 }
  86
  87
  88 void SvxFmAbsRecWin::LoseFocus()
  89 {
  90     FirePosition( false );
  91 }
  92
  93
  94 void SvxFmAbsRecWin::KeyInput( const KeyEvent& rKeyEvent )
  95 {
  96     if( rKeyEvent.GetKeyCode() == KEY_RETURN && !GetText().isEmpty() )
  97         FirePosition( true );
  98     else
  99         NumericField::KeyInput( rKeyEvent );
 100 }
 101
 102
 103 // class SvxFmTbxCtlConfig
 104
 105
 106 struct MapSlotToCmd
 107 {
 108     sal_uInt16      nSlotId;
 109     const char* pCommand;
 110 };
 111
 112 static const MapSlotToCmd SlotToCommands[] =
 113 {
 114     { SID_FM_PUSHBUTTON,        ".uno:Pushbutton"       },
 115     { SID_FM_RADIOBUTTON,       ".uno:RadioButton"      },
 116     { SID_FM_CHECKBOX,          ".uno:CheckBox"         },
 117     { SID_FM_FIXEDTEXT,         ".uno:Label"            },
 118     { SID_FM_GROUPBOX,          ".uno:GroupBox"         },
 119     { SID_FM_LISTBOX,           ".uno:ListBox"          },
 120     { SID_FM_COMBOBOX,          ".uno:ComboBox"         },
 121     { SID_FM_EDIT,              ".uno:Edit"             },
 122     { SID_FM_DBGRID,            ".uno:Grid"             },
 123     { SID_FM_IMAGEBUTTON,       ".uno:Imagebutton"      },
 124     { SID_FM_IMAGECONTROL,      ".uno:ImageControl"     },
 125     { SID_FM_FILECONTROL,       ".uno:FileControl"      },
 126     { SID_FM_DATEFIELD,         ".uno:DateField"        },
 127     { SID_FM_TIMEFIELD,         ".uno:TimeField"        },
 128     { SID_FM_NUMERICFIELD,      ".uno:NumericField"     },
 129     { SID_FM_CURRENCYFIELD,     ".uno:CurrencyField"    },
 130     { SID_FM_PATTERNFIELD,      ".uno:PatternField"     },
 131     { SID_FM_DESIGN_MODE,       ".uno:SwitchControlDesignMode" },
 132     { SID_FM_FORMATTEDFIELD,    ".uno:FormattedField"   },
 133     { SID_FM_SCROLLBAR,         ".uno:ScrollBar"        },
 134     { SID_FM_SPINBUTTON,        ".uno:SpinButton"       },
 135     { 0,                        ""                      }
 136 };
 137
 138 SFX_IMPL_TOOLBOX_CONTROL( SvxFmTbxCtlConfig, SfxUInt16Item );
 139
 140
 141 SvxFmTbxCtlConfig::SvxFmTbxCtlConfig( sal_uInt16 nSlotId, sal_uInt16 nId, ToolBox& rTbx )
 142     : SfxToolBoxControl( nSlotId, nId, rTbx )
 143     ,nLastSlot( 0 )
 144 {
 145     rTbx.SetItemBits( nId, ToolBoxItemBits::DROPDOWN | rTbx.GetItemBits( nId ) );
 146 }
 147
 148
 149 void SvxFmTbxCtlConfig::StateChanged(sal_uInt16 nSID, SfxItemState eState, const SfxPoolItem* pState )
 150 {
 151     if (nSID == SID_FM_CONFIG)
 152     {
 153         sal_uInt16 nSlot   = 0;
 154         if (eState >= SfxItemState::DEFAULT)
 155             nSlot = static_cast<const SfxUInt16Item*>(pState)->GetValue();
 156
 157         switch( nSlot )
 158         {
 159             case SID_FM_PUSHBUTTON:
 160             case SID_FM_RADIOBUTTON:
 161             case SID_FM_CHECKBOX:
 162             case SID_FM_FIXEDTEXT:
 163             case SID_FM_GROUPBOX:
 164             case SID_FM_LISTBOX:
 165             case SID_FM_COMBOBOX:
 166             case SID_FM_NAVIGATIONBAR:
 167             case SID_FM_EDIT:
 168             case SID_FM_DBGRID:
 169             case SID_FM_IMAGEBUTTON:
 170             case SID_FM_IMAGECONTROL:
 171             case SID_FM_FILECONTROL:
 172             case SID_FM_DATEFIELD:
 173             case SID_FM_TIMEFIELD:
 174             case SID_FM_NUMERICFIELD:
 175             case SID_FM_CURRENCYFIELD:
 176             case SID_FM_PATTERNFIELD:
 177             case SID_FM_DESIGN_MODE:
 178             case SID_FM_FORMATTEDFIELD:
 179             case SID_FM_SCROLLBAR:
 180             case SID_FM_SPINBUTTON:
 181             {   // set a new image, matching to this slot
 182                 OUString aSlotURL = "slot:" + OUString::number( nSlot);
 183                 Image aImage = GetImage( m_xFrame, aSlotURL, hasBigImages() );
 184                 GetToolBox().SetItemImage( GetId(), aImage );
 185                 nLastSlot = nSlot;
 186             }
 187             break;
 188         }
 189     }
 190     SfxToolBoxControl::StateChanged( nSID, eState,pState );
 191 }
 192
 193
 194 SfxPopupWindowType SvxFmTbxCtlConfig::GetPopupWindowType() const
 195 {
 196     return( nLastSlot == 0 ? SfxPopupWindowType::ONCLICK : SfxPopupWindowType::ONTIMEOUT );
 197 }
 198
 199
 200 VclPtr<SfxPopupWindow> SvxFmTbxCtlConfig::CreatePopupWindow()
 201 {
 202     if ( GetSlotId() == SID_FM_CONFIG )
 203     {
 204         ::svxform::FormToolboxes aToolboxes( m_xFrame );
 205         createAndPositionSubToolBar( aToolboxes.getToolboxResourceName( SID_FM_CONFIG ) );
 206     }
 207     return NULL;
 208 }
 209
 210
 211 void SvxFmTbxCtlConfig::Select( sal_uInt16 /*nSelectModifier*/ )
 212 {
 213
 214     // Click auf den Button SID_FM_CONFIG in der ObjectBar
 215     if ( nLastSlot )
 216     {
 217         sal_uInt16 n = 0;
 218         while( SlotToCommands[n].nSlotId > 0 )
 219         {
 220             if ( SlotToCommands[n].nSlotId == nLastSlot )
 221                 break;
 222             n++;
 223         }
 224
 225         if ( SlotToCommands[n].nSlotId > 0 )
 226         {
 227             Sequence< PropertyValue > aArgs;
 228             Dispatch( OUString::createFromAscii( SlotToCommands[n].pCommand ),
 229                       aArgs );
 230         }
 231     }
 232 }
 233
 234 SFX_IMPL_TOOLBOX_CONTROL( SvxFmTbxCtlAbsRec, SfxInt32Item );
 235
 236 SvxFmTbxCtlAbsRec::SvxFmTbxCtlAbsRec( sal_uInt16 nSlotId, sal_uInt16 nId, ToolBox& rTbx )
 237     :SfxToolBoxControl( nSlotId, nId, rTbx )
 238 {
 239 }
 240
 241
 242 SvxFmTbxCtlAbsRec::~SvxFmTbxCtlAbsRec()
 243 {
 244 }
 245
 246
 247 void SvxFmTbxCtlAbsRec::StateChanged( sal_uInt16 nSID, SfxItemState eState, const SfxPoolItem* pState )
 248 {
 249     sal_uInt16              nId = GetId();
 250     ToolBox*            pToolBox = &GetToolBox();
 251     SvxFmAbsRecWin*     pWin = static_cast<SvxFmAbsRecWin*>( pToolBox->GetItemWindow(nId) );
 252
 253     assert(pWin && "Control not found!");
 254
 255     if (pState)
 256     {
 257         const SfxInt32Item* pItem = PTR_CAST( SfxInt32Item, pState );
 258         DBG_ASSERT( pItem, "SvxFmTbxCtlAbsRec::StateChanged: invalid item!" );
 259         pWin->SetValue( pItem ? pItem->GetValue() : -1 );
 260     }
 261
 262     bool bEnable = SfxItemState::DISABLED != eState && pState;
 263     if (!bEnable)
 264         pWin->SetText(OUString());
 265
 266
 267     // Enablen/disablen des Fensters
 268     pToolBox->EnableItem(nId, bEnable);
 269     SfxToolBoxControl::StateChanged( nSID, eState,pState );
 270 }
 271
 272
 273 VclPtr<vcl::Window> SvxFmTbxCtlAbsRec::CreateItemWindow( vcl::Window* pParent )
 274 {
 275     VclPtrInstance<SvxFmAbsRecWin> pWin( pParent, this );
 276     pWin->SetUniqueId( UID_ABSOLUTE_RECORD_WINDOW );
 277     return pWin.get();
 278 }
 279
 280 SFX_IMPL_TOOLBOX_CONTROL( SvxFmTbxCtlRecText, SfxBoolItem );
 281
 282 SvxFmTbxCtlRecText::SvxFmTbxCtlRecText( sal_uInt16 nSlotId, sal_uInt16 nId, ToolBox& rTbx )
 283     :SfxToolBoxControl( nSlotId, nId, rTbx )
 284 {
 285 }
 286
 287
 288 SvxFmTbxCtlRecText::~SvxFmTbxCtlRecText()
 289 {
 290 }
 291
 292
 293 VclPtr<vcl::Window> SvxFmTbxCtlRecText::CreateItemWindow( vcl::Window* pParent )
 294 {
 295     OUString aText(SVX_RESSTR(RID_STR_REC_TEXT));
 296     VclPtrInstance<FixedText> pFixedText( pParent );
 297     Size aSize( pFixedText->GetTextWidth( aText ), pFixedText->GetTextHeight( ) );
 298     pFixedText->SetText( aText );
 299     aSize.Width() += 6;
 300     pFixedText->SetSizePixel( aSize );
 301     pFixedText->SetBackground(Wallpaper(Color(COL_TRANSPARENT)));
 302
 303     return pFixedText;
 304 }
 305
 306 SFX_IMPL_TOOLBOX_CONTROL( SvxFmTbxCtlRecFromText, SfxBoolItem );
 307
 308 SvxFmTbxCtlRecFromText::SvxFmTbxCtlRecFromText( sal_uInt16 nSlotId, sal_uInt16 nId, ToolBox& rTbx )
 309     :SfxToolBoxControl( nSlotId, nId, rTbx )
 310 {
 311 }
 312
 313
 314 SvxFmTbxCtlRecFromText::~SvxFmTbxCtlRecFromText()
 315 {
 316 }
 317
 318
 319 VclPtr<vcl::Window> SvxFmTbxCtlRecFromText::CreateItemWindow( vcl::Window* pParent )
 320 {
 321     OUString aText(SVX_RESSTR(RID_STR_REC_FROM_TEXT));
 322     VclPtrInstance<FixedText> pFixedText( pParent, WB_CENTER );
 323     Size aSize( pFixedText->GetTextWidth( aText ), pFixedText->GetTextHeight( ) );
 324     aSize.Width() += 12;
 325     pFixedText->SetText( aText );
 326     pFixedText->SetSizePixel( aSize );
 327     pFixedText->SetBackground(Wallpaper(Color(COL_TRANSPARENT)));
 328     return pFixedText.get();
 329 }
 330
 331 SFX_IMPL_TOOLBOX_CONTROL( SvxFmTbxCtlRecTotal, SfxStringItem );
 332
 333
 334 SvxFmTbxCtlRecTotal::SvxFmTbxCtlRecTotal( sal_uInt16 nSlotId, sal_uInt16 nId, ToolBox& rTbx )
 335     :SfxToolBoxControl( nSlotId, nId, rTbx )
 336     ,pFixedText( NULL )
 337 {
 338 }
 339
 340
 341 SvxFmTbxCtlRecTotal::~SvxFmTbxCtlRecTotal()
 342 {
 343 }
 344
 345
 346 VclPtr<vcl::Window> SvxFmTbxCtlRecTotal::CreateItemWindow( vcl::Window* pParent )
 347 {
 348     pFixedText.reset(VclPtr<FixedText>::Create( pParent ));
 349     OUString aSample("123456");
 350     Size aSize( pFixedText->GetTextWidth( aSample ), pFixedText->GetTextHeight( ) );
 351     aSize.Width() += 12;
 352     pFixedText->SetSizePixel( aSize );
 353     pFixedText->SetBackground();
 354     pFixedText->SetPaintTransparent(true);
 355     return pFixedText;
 356 }
 357
 358
 359 void SvxFmTbxCtlRecTotal::StateChanged( sal_uInt16 nSID, SfxItemState eState, const SfxPoolItem* pState )
 360 {
 361
 362     // Setzen des FixedTextes
 363     if (GetSlotId() != SID_FM_RECORD_TOTAL)
 364         return;
 365
 366     OUString aText;
 367     if (pState)
 368         aText = static_cast<const SfxStringItem*>(pState)->GetValue();
 369     else
 370         aText = "?";
 371
 372     pFixedText->SetText( aText );
 373     pFixedText->Update();
 374     pFixedText->Flush();
 375
 376     SfxToolBoxControl::StateChanged( nSID, eState,pState );
 377 }
 378
 379 SFX_IMPL_TOOLBOX_CONTROL( SvxFmTbxNextRec, SfxBoolItem );
 380
 381
 382 SvxFmTbxNextRec::SvxFmTbxNextRec( sal_uInt16 nSlotId, sal_uInt16 nId, ToolBox& rTbx )
 383     :SfxToolBoxControl( nSlotId, nId, rTbx )
 384 {
 385     rTbx.SetItemBits(nId, rTbx.GetItemBits(nId) | ToolBoxItemBits::REPEAT);
 386
 387     AllSettings aSettings = rTbx.GetSettings();
 388     MouseSettings aMouseSettings = aSettings.GetMouseSettings();
 389     aMouseSettings.SetButtonRepeat(aMouseSettings.GetButtonRepeat() / 4);
 390     aSettings.SetMouseSettings(aMouseSettings);
 391     rTbx.SetSettings(aSettings, true);
 392 }
 393
 394 SFX_IMPL_TOOLBOX_CONTROL( SvxFmTbxPrevRec, SfxBoolItem );
 395
 396
 397 SvxFmTbxPrevRec::SvxFmTbxPrevRec( sal_uInt16 nSlotId, sal_uInt16 nId, ToolBox& rTbx )
 398     :SfxToolBoxControl( nSlotId, nId, rTbx )
 399 {
 400     rTbx.SetItemBits(nId, rTbx.GetItemBits(nId) | ToolBoxItemBits::REPEAT);
 401 }
 402
 403
 404 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */