The class LCDLabel (gb.form) implements a label that displays its text like an LCD screen. In a 16-segment display element (SISD - sixteen-segment display), each segment can be switched on or off.
Each character is displayed in a separate 16-segment display element. The number of characters to be displayed determines the number of 16-segment display elements. Due to the special geometry in the 16-segment display element, not all characters can be displayed. All Latin letters (ISO) and all digits [0-9] are safely displayed. Lower case letters are automatically converted to upper case. In addition, there are the following 19 special characters:
_ [ ] - + | / = * < > @ ' ' ° ~ $
Figure 17.16.1: Display of special characters
You must mask the characters backslash \ and inverted commas “ with a backslash \:
LCDLabel.Text = "\\" und LCDLabel.Text = "\""
A full stop and a colon are (alternatively) displayed in their own segment immediately after the 16-segment display element: LCDLabel.Text = "http://www.gambas-buch.de".
Figure 17.16.2: Display of special characters, full stop and colon
The German umlauts and other characters - such as a ? or an ß - are not displayed and are replaced by a space! Good to know: A space as a permissible character is indicated by a space!
Selected properties of an LCDLabel are listed and described in the following table:
|Alignment||Integer||Specifies the alignment of the text to be displayed. Constants: Align.Normal, Align.Left, Align.Right, Align.Centre.|
|Border||Boolean||Indicates whether the LCD label is surrounded by a border or not.|
|HighlightColor||Integer||Sets the colour for HighlightColor or reads the colour value. Default value is Color.Default and corresponds without HighlightColor.|
|Padding||Integer||Determines the border width around the LCDLabel or sets the border width.|
|Sheared||Boolean||Indicates whether the text is displayed tilted to the right or not.|
|Text||String||Returns the displayed LCDLabel text or sets the text to be displayed in the LCDLabel.|
Table 220.127.116.11: Overview of properties of the component LCDLabel
This project is about the (formatted) display of date and time, among other things. The source code is given in full. The system time is read out every second via a timer and displayed with a flashing colon (→ lines 26 and 34) as a separator:
Figure 18.104.22.168: Display time
 ' Gambas class file   Private bTrenn As Boolean   Public Sub Form_Open()  FMain.Center  FMain.Text = "Tempus fugit ..."  FMain.Arrangement = Arrange.Vertical  FMain.Margin = True  FMain.Spacing = True   LCDLabel.Border = True  LCDLabel.Alignment = Align.Center  LCDLabel.Background = &HC3DDFF&  LCDLabel.Foreground = &H0000FF& ' Color.Red  LCDLabel.Expand = True  LCDLabel.Font = Font["Arial, 14"] ' Zulässig - aber ohne Wirkung!   LCDTimer.Delay = 1000  LCDTimer.Start  LCDTimer_Timer()  End   Public Sub LCDTimer_Timer()   bTrenn = Not bTrenn   ' LCDLabel.Padding = 8  ' FMain.Text = "19 Sonderzeichen …"  ' LCDLabel.Text = "_+-|\\/=*<>@'\"`°~$"  ' FMain.Text = "Das Online-Buch im Internet"  ' LCDLabel.Text = "http://www.gambas-buch.de"   LCDLabel.Text = Format(Now,"hh" & If(bTrenn, ":", "") & "nn" & If(bTrenn,":","") & "ss")   End
You can alternatively replace line 34 with the following lines: