[Gambas-user] [Gambas Bug Tracker] Bug #1083: Add a Shaded property to DesktopWindows.class

[bugtracker at ...3416...]

http://gambaswiki.org/bugtracker/edit?object=BUG.1083&from=L21haW4-

Tony MOREHEN reported a new bug.

Summary
-------

Add a Shaded property to DesktopWindows.class

Type             : Request
Priority         : Medium
Gambas version   : 3.9.90 (TRUNK)
Product          : Unknown


Description
-----------

Setting the property Shaded to true rolls up an X11 top window until only the titlebar is seen.  It is a standard X11 property, similar to FullScreen.

The following code needs to be added to DesktopWindows.class:
 
Property Shaded As Boolean

Private Function Shaded_Read() As Boolean

  Dim aState As String[] = GetState()

  If aState Then
    Return aState.Find("_NET_WM_STATE_SHADED") >= 0 
  Endif

End

Private Sub Shaded_Write(Value As Boolean)

  If Value Then
    SetState("_NET_WM_STATE_SHADED")
  Else
    ClearState("_NET_WM_STATE_SHADED")
  Endif

End


System information
------------------

[System]
Gambas=3.9.90 r8018
OperatingSystem=Linux
Kernel=4.8.15-1-MANJARO
Architecture=x86_64
Distribution=Manjaro Linux
Desktop=XFCE
Theme=Gtk
Language=en_CA.utf8
Memory=3947M

[Libraries]
Cairo=libcairo.so.2.11400.8
Curl=libcurl.so.4.4.0
DBus=libdbus-1.so.3.14.9
GStreamer=libgstreamer-0.10.so.0.30.0
GStreamer=libgstreamer-1.0.so.0.1002.0
GTK+2=libgtk-x11-2.0.so.0.2400.31
GTK+3=libgtk-3.so.0.2200.5
OpenGL=libGL.so.1.2.0
Poppler=libpoppler.so.66.0.0
QT4=libQtCore.so.4.8.7
QT5=libQt5Core.so.5.7.1
SDL=libSDL-1.2.so.0.11.4
SQLite=libsqlite3.so.0.8.6

[Environment]
DBUS_SESSION_BUS_ADDRESS=unix:path=/run/user/1000/bus
DESKTOP_SESSION=xfce
DISPLAY=:0.0
GB_GUI=gb.qt4
GDMSESSION=xfce
GLADE_CATALOG_PATH=:
GLADE_MODULE_PATH=:
GLADE_PIXMAP_PATH=:
GTK2_RC_FILES=<home>/.gtkrc-2.0
GTK_MODULES=canberra-gtk-module
HOME=<home>
LANG=en_CA.utf8
LC_ADDRESS=en_CA.UTF-8
LC_IDENTIFICATION=en_CA.UTF-8
LC_MEASUREMENT=en_CA.UTF-8
LC_MONETARY=en_CA.UTF-8
LC_NAME=en_CA.UTF-8
LC_NUMERIC=en_CA.UTF-8
LC_PAPER=en_CA.UTF-8
LC_TELEPHONE=en_CA.UTF-8
LC_TIME=en_CA.UTF-8
LOGNAME=<user>
MAIL=/var/spool/mail/<user>
MOZ_PLUGIN_PATH=/usr/lib/mozilla/plugins
PATH=/usr/local/sbin:/usr/local/bin:/usr/bin:/usr/lib/jvm/default/bin:/usr/bin/site_perl:/usr/bin/vendor_perl:/usr/bin/core_perl
PWD=<home>
QT_QPA_PLATFORMTHEME=qt5ct
SAL_USE_VCLPLUGIN=gtk
SESSION_MANAGER=local/<hostname>:@/tmp/.ICE-unix/9931,unix/<hostname>:/tmp/.ICE-unix/9931
SHELL=/bin/bash
SHLVL=2
SSH_AGENT_PID=9936
SSH_AUTH_SOCK=/tmp/ssh-bUdChQqs4Zo0/agent.9935
TZ=:/etc/localtime
USER=<user>
XAUTHORITY=<home>/.Xauthority
XDG_CONFIG_DIRS=/etc/xdg
XDG_CURRENT_DESKTOP=XFCE
XDG_DATA_DIRS=/usr/local/share:/usr/share
XDG_GREETER_DATA_DIR=/var/lib/lightdm-data/<user>
XDG_MENU_PREFIX=xfce-
XDG_RUNTIME_DIR=/run/user/1000
XDG_SEAT=seat0
XDG_SEAT_PATH=/org/freedesktop/DisplayManager/Seat0
XDG_SESSION_DESKTOP=xfce
XDG_SESSION_ID=c4
XDG_SESSION_PATH=/org/freedesktop/DisplayManager/Session1
XDG_SESSION_TYPE=x11
XDG_VTNR=7
_=/usr/bin/gambas3