diff --git a/comp/src/gb.form/.src/Button/ButtonBox.class b/comp/src/gb.form/.src/Button/ButtonBox.class index c0e793d17..342cd14c1 100644 --- a/comp/src/gb.form/.src/Button/ButtonBox.class +++ b/comp/src/gb.form/.src/Button/ButtonBox.class @@ -4,7 +4,7 @@ Export Inherits UserControl -Public Const _Properties As String = "*,Action,Text,Alignment{Align.Normal;Left;Center;Right}=Normal,Picture,ReadOnly,Border=True,Button=True,ClearButton,Filter,FilterMenu{Menu}" +Public Const _Properties As String = "*,Action,Text,Alignment{Align.Normal;Left;Center;Right}=Normal,Picture,ReadOnly,Placeholder,Border=True,Button=True,ClearButton,Filter,FilterMenu{Menu}" Public Const _DefaultEvent As String = "Click" Public Const _DefaultSize As String = "24,4" Public Const _Similar As String = "TextBox" @@ -28,6 +28,7 @@ Property Alignment As Integer Property ClearButton As Boolean Property Filter As Boolean Property FilterMenu As String +Property Placeholder As String 'Private $hPanel As Panel Private $hBackground As DrawingArea @@ -401,3 +402,15 @@ Public Sub FilterNow() FilterTimer_Timer End + +Private Function Placeholder_Read() As String + + Return $hTextBox.Placeholder + +End + +Private Sub Placeholder_Write(Value As String) + + $hTextBox.Placeholder = Value + +End diff --git a/comp/src/gb.form/.src/Spinner.class b/comp/src/gb.form/.src/Spinner.class index c3578186a..847f1987e 100644 --- a/comp/src/gb.form/.src/Spinner.class +++ b/comp/src/gb.form/.src/Spinner.class @@ -7,14 +7,35 @@ Inherits UserControl Public Const _Properties As String = "*,Border,Label,Padding{Range:0;63},Margin=False,Type={Spinner.*}" Public Const _DefaultSize As String = "8,8" -Public Enum {Line}, Dot, Circle +'' Spinner type drawing lines. +Public Const {Line} As Integer = 0 + +'' Spinner type drawing dots. +Public Const Dot As Integer = 1 + +'' Spinner type drawing a ring. +Public Const Circle As Integer = 2 Property Border As Boolean Property Label As Boolean Property Value As Float Property Enabled As Boolean Property Padding As Integer + +'' @{since 3.16} +'' +'' Return or set if there is an inner margin between the spinner and the control border. + Property Margin As Boolean + +'' @{since 3.16} +'' +'' Return or set the Spinner type. +'' +'' The following types are implemented: [../line], [../dot], [../circle]. +'' +'' The default type is [../line]. + Property Type As Integer Private $fStartTime As Float diff --git a/comp/src/gb.form/map/icon.map b/comp/src/gb.form/map/icon.map index deaa1fe10..4255d788b 100644 --- a/comp/src/gb.form/map/icon.map +++ b/comp/src/gb.form/map/icon.map @@ -1,5 +1,6 @@ access preferences/preferences-desktop-accessibility;apps/preferences-desktop-accessibility add actions/list-add +added emblems/vcs-added;emblem/added agenda apps/agenda;actions/view-calendar-agenda align-bottom actions/align-vertical-bottom align-center actions/align-horizontal-center @@ -48,6 +49,7 @@ color [-breeze*]actions/color-picker-grey;[breeze*]apps/prefer color-picker actions/color-picker component categories/applications-utilities;apps/nepomuk computer devices/computer +conflict emblems/vcs-conflicting;emblems/emblem-cvs-conflict connect actions/network-connect contrast # copy actions/edit-copy @@ -166,6 +168,7 @@ md $(mime)/text-x-markdown media-player devices/multimedia-player menu apps/alacarte;apps/kmenuedit;actions/application-menu microphone devices/audio-input-microphone +modified emblems/vcs-locally-modified;emblems/emblem-csv-modified monitor apps/utilities-system-monitor mouse devices/input-mouse mount actions/media-mount