Add Checkbox and DateTime Editor for frmEdit, New LookupGrid WIP

This commit is contained in:
Jonathan Jenne
2019-02-28 17:33:47 +01:00
parent 667b8f1b2f
commit cfbcd8a8f2
22 changed files with 574 additions and 74 deletions

View File

@@ -24,11 +24,15 @@ Public Class frmMain
Private Sub SetOnlineLabel()
If My.Application.Service.Online Then
LabelServiceOnline.Caption = "Service Online"
LabelServiceOnline.ItemAppearance.Normal.ForeColor = Color.Green
LabelServiceOnline.Visibility = DevExpress.XtraBars.BarItemVisibility.Always
LabelServiceOffline.Visibility = DevExpress.XtraBars.BarItemVisibility.Never
'LabelServiceOnline.Caption = "Service Online"
'LabelServiceOnline.ItemAppearance.Normal.ForeColor = Color.Green
Else
LabelServiceOnline.Caption = "Service Offline"
LabelServiceOnline.ItemAppearance.Normal.ForeColor = Color.Red
LabelServiceOnline.Visibility = DevExpress.XtraBars.BarItemVisibility.Never
LabelServiceOffline.Visibility = DevExpress.XtraBars.BarItemVisibility.Always
'LabelServiceOnline.Caption = "Service Offline"
'LabelServiceOnline.ItemAppearance.Normal.ForeColor = Color.Red
End If
End Sub