fivedev/harbour-core
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

2011-05-31 15:12 UTC-0800 Pritpal Bedi (bedipritpal@hotmail.com)

Browse Source 
* contrib/hbide/hbide.qrc
  * contrib/hbide/resources/hideshow.png
    + Added: image for top-toolbar to activate show/hide of dock widgets.

  * contrib/hbide/ideactions.prg
  * contrib/hbide/idedocks.prg
  * contrib/hbide/idemain.prg
  * contrib/hbide/idesaveload.prg
    + Implemented: a single-click mechanism to hide or show all managed
      dock widgets in all docking areas. This can be accomplished via 
      "Hide Show Docks" top-toolbar icon or <View> main menu option.

      This implementation is extremely usable feature, requested by Massimo.
      Just manage docks to the desired position and areas, activate this 
      option on/off and then see how useful it is. User gets more editing 
      area and also has the power to do additional tasks by bringing 
      back the last setup as and when required. The setup is remembered for 
      the next run even if docks are hidden at the time of previous close.
This commit is contained in:
Pritpal Bedi
2011-05-31 22:25:11 +00:00
parent d514537840
commit 1dd484c8fa
7 changed files with 96 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

20
harbour/ChangeLog
View File

@@ -16,6 +16,26 @@
The license applies to all entries newer than 2009-04-28.
*/
2011-05-31 15:12 UTC-0800 Pritpal Bedi (bedipritpal@hotmail.com)
* contrib/hbide/hbide.qrc
* contrib/hbide/resources/hideshow.png
+ Added: image for top-toolbar to activate show/hide of dock widgets.
* contrib/hbide/ideactions.prg
* contrib/hbide/idedocks.prg
* contrib/hbide/idemain.prg
* contrib/hbide/idesaveload.prg
+ Implemented: a single-click mechanism to hide or show all managed
dock widgets in all docking areas. This can be accomplished via
"Hide Show Docks" top-toolbar icon or <View> main menu option.
This implementation is extremely usable feature, requested by Massimo.
Just manage docks to the desired position and areas, activate this
option on/off and then see how useful it is. User gets more editing
area and also has the power to do additional tasks by bringing
back the last setup as and when required. The setup is remembered for
the next run even if docks are hidden at the time of previous close.
2011-05-31 16:03 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl)
* harbour/src/rtl/gttrm/gttrm.c
* enable resizing if PuTTY is autodetected regardles of [HB_]TERM setting

1
harbour/contrib/hbide/hbide.qrc
View File

@@ -282,5 +282,6 @@
<file>resources/rp_ellipse.png</file>
<file>resources/rp_shapes.png</file>
<file>resources/memo.png</file>
<file>resources/hideshow.png</file>
</qresource>
</RCC>

4
harbour/contrib/hbide/ideactions.prg
View File

@@ -312,6 +312,7 @@ METHOD IdeActions:loadActions()
aadd( aAct, { "Setup" , "hbIDE Setup" , "idepreferences" , "" , "No", "Yes" } )
* aadd( aAct, { "Tools" , "Tools and Utilities" , "tools" , "" , "No", "Yes" } )
aadd( aAct, { "ChangeLog" , "Manage ChangeLog(s)" , "memo" , "" , "No", "Yes" } )
aadd( aAct, { "TB_Hide" , "Hide Show Docks" , "hideshow" , "" , "No", "Yes" } )
RETURN aAct
@@ -332,6 +333,7 @@ METHOD IdeActions:buildToolBar()
oTBar:buttonClick := {|oButton| ::oIde:execAction( oButton:key ) }
oTBar:addItem( ::getAction( "TB_Exit" ), , , , , , "Exit" )
oTBar:addItem( ::getAction( "TB_Hide" ), , , , , , "Hide" )
oTBar:addItem( ::getAction( "TB_Home" ), , , , , , "Home" )
oTBar:addItem( , , , , , nSep )
oTBar:addItem( ::getAction( "TB_New" ), , , , , , "New" )
@@ -530,6 +532,8 @@ METHOD IdeActions:buildMainMenu()
oSubMenu:title := "~View"
oMenuBar:addItem( { oSubMenu, NIL } )
oSubMenu:addItem( { ::getAction( "TB_Hide" ), {|| oIde:execAction( "Hide" ) } } )
::oIde:qAnimateAction := QAction( oSubMenu:oWidget )
::qAnimateAction:setText( "Toggle Animation" )
::qAnimateAction:setCheckable( .t. )

34
harbour/contrib/hbide/idedocks.prg
View File

@@ -158,6 +158,7 @@ CLASS IdeDocks INHERIT IdeObject
METHOD buildFormatWidget()
METHOD showStats()
METHOD hideStats()
METHOD hideAllDocks()
ENDCLASS
@@ -177,6 +178,39 @@ METHOD IdeDocks:create( oIde )
/*----------------------------------------------------------------------*/
METHOD IdeDocks:hideAllDocks()
// Left
::oDockPT : hide()
::oDockED : hide()
::oSkltnsTreeDock : hide()
// Right
::oOutputResult : hide()
::oEnvironDock : hide()
::oPropertiesDock : hide()
::oThemesDock : hide()
::oDocViewDock : hide()
::oDocWriteDock : hide()
::oFindDock : hide()
::oFunctionsDock : hide()
::oSkeltnDock : hide()
::oHelpDock : hide()
::oFuncDock : hide()
::oSourceThumbnailDock : hide()
::oQScintillaDock : hide()
::oReportsManagerDock : hide()
::oFormatDock : hide()
// Bottom
::oDockB2 : hide()
::oDockB1 : hide()
::oDockB : hide()
RETURN Self
/*----------------------------------------------------------------------*/
METHOD IdeDocks:destroy()
LOCAL qTmp

3
harbour/contrib/hbide/idemain.prg
View File

@@ -844,6 +844,9 @@ METHOD HbIde:showApplicationCursor( nCursor )
METHOD HbIde:execAction( cKey )
SWITCH cKey
CASE "Hide"
::oINI:showHideDocks()
EXIT
CASE "ToggleStatusBar"
IF ::lStatusBarVisible
::oSBar:oWidget:hide()

38
harbour/contrib/hbide/idesaveload.prg
View File

@@ -159,6 +159,12 @@ CLASS IdeINI INHERIT IdeObject
DATA aAppThemes INIT {}
DATA lEditsMdi INIT .f.
DATA lShowEditsLeftToolbar INIT .t.
DATA lShowEditsTopToolbar INIT .t.
DATA lDocksTabShape INIT QTabWidget_Triangular
DATA lShowHideDocks INIT .t.
METHOD new( oIde )
METHOD create( oIde )
METHOD destroy()
@@ -175,6 +181,7 @@ CLASS IdeINI INHERIT IdeObject
METHOD getSnippetsFile()
METHOD getShortcutsFile()
METHOD getThemesFile()
METHOD showHideDocks()
ENDCLASS
@@ -283,6 +290,21 @@ METHOD IdeINI:getThemesFile()
/*------------------------------------------------------------------------*/
METHOD IdeINI:showHideDocks()
IF ::lShowHideDocks /* Assumed visible, hide all */
hbide_saveSettings( ::oIde, "tempsettings.ide" )
::oDK:hideAllDocks()
ELSE
hbide_restSettings( ::oIde, "tempsettings.ide" )
ENDIF
::lShowHideDocks := ! ::lShowHideDocks
RETURN Self
/*----------------------------------------------------------------------*/
METHOD IdeINI:save( cHbideIni )
LOCAL j, nTab, pTab, n, txt_, oEdit, nTabs, nn, a_, s
@@ -292,6 +314,10 @@ METHOD IdeINI:save( cHbideIni )
RETURN Nil
ENDIF
IF ! ::lShowHideDocks
::showHideDocks()
ENDIF
txt_:= {}
aadd( txt_, "[HBIDE]" )
@@ -751,21 +777,25 @@ METHOD IdeINI:load( cHbideIni )
/*----------------------------------------------------------------------*/
STATIC FUNCTION hbide_saveSettings( oIde )
FUNCTION hbide_saveSettings( oIde, cFile )
LOCAL cPath
DEFAULT cFile TO "settings.ide"
hb_fNameSplit( oIde:cProjIni, @cPath )
hbqt_QMainWindow_saveSettings( cPath + "settings.ide", "hbidesettings", oIde:oDlg:oWidget )
hbqt_QMainWindow_saveSettings( cPath + cFile, "hbidesettings", oIde:oDlg:oWidget )
RETURN nil
/*----------------------------------------------------------------------*/
FUNCTION hbide_restSettings( oIde )
FUNCTION hbide_restSettings( oIde, cFile )
LOCAL cPath
DEFAULT cFile TO "settings.ide"
hb_fNameSplit( oIde:cProjIni, @cPath )
hbqt_QMainWindow_restSettings( cPath + "settings.ide", "hbidesettings", oIde:oDlg:oWidget )
hbqt_QMainWindow_restSettings( cPath + cFile, "hbidesettings", oIde:oDlg:oWidget )
RETURN nil

BIN
harbour/contrib/hbide/resources/hideshow.png Normal file
View File

Binary file not shown.
Side by Side

After

Width:  |  Height:  |  Size: 651 B