Desktop application to see IOW server load and connect to IOW and external servers via jupyterlab and xpra
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

1031 lines
22 KiB

9 months ago
object Form1: TForm1
Left = 550
Height = 976
9 months ago
Top = 0
Width = 1300
9 months ago
Caption = 'phyportal'
ClientHeight = 976
ClientWidth = 1300
9 months ago
Color = clNavy
Constraints.MinHeight = 976
Constraints.MinWidth = 1200
DesignTimePPI = 120
Font.Height = -18
9 months ago
Font.Name = 'Open Sans'
OnCreate = FormCreate
OnShow = FormShow
Position = poDesktopCenter
LCLVersion = '2.0.4.0'
9 months ago
object Shape1: TShape
Left = 16
Height = 360
Top = 80
Width = 1272
Anchors = [akTop, akLeft, akRight]
9 months ago
Brush.Color = clSilver
Pen.Style = psClear
end
object Label1: TLabel
Left = 24
Height = 24
Top = 112
Width = 52
9 months ago
Caption = 'phy-1'
Font.Height = -18
9 months ago
Font.Name = 'Open Sans'
Font.Style = [fsBold]
ParentColor = False
9 months ago
ParentFont = False
end
object LabelCPU1: TLabel
Left = 112
Height = 24
Top = 112
Width = 147
9 months ago
Caption = 'CPUs busy (total):'
Font.Height = -18
9 months ago
Font.Name = 'Open Sans'
ParentColor = False
9 months ago
ParentFont = False
end
object LabelMEM1: TLabel
Left = 112
Height = 24
Top = 144
Width = 142
9 months ago
Caption = 'RAM used (total):'
Font.Height = -18
9 months ago
Font.Name = 'Open Sans'
ParentColor = False
9 months ago
ParentFont = False
end
object Button2: TButton
Left = 112
Height = 31
Top = 176
Width = 155
9 months ago
Caption = 'more info...'
Font.Height = -18
9 months ago
Font.Name = 'Open Sans'
OnClick = Button2Click
ParentFont = False
TabOrder = 0
end
object Memo1: TMemo
Left = 496
Height = 95
Top = 112
Width = 566
Anchors = [akTop, akLeft, akRight]
Font.Height = -18
9 months ago
Font.Name = 'Open Sans'
Lines.Strings = (
'getm (by klingbei) uses 50 cores (expected end 2023-10-10)'
'cdo merge (by thomas) uses 2 cores (expected end 2023-10-10)'
)
OnChange = Memo1Change
ParentFont = False
ReadOnly = True
ScrollBars = ssBoth
TabOrder = 1
WordWrap = False
end
object Button3: TButton
Left = 1072
Height = 31
Top = 112
Width = 206
Anchors = [akTop, akRight]
9 months ago
Caption = 'start jupyter lab'
Font.Height = -18
9 months ago
Font.Name = 'Open Sans'
OnClick = Button3Click
ParentFont = False
TabOrder = 2
end
object Button4: TButton
Left = 1071
Height = 31
Top = 144
Width = 208
Anchors = [akTop, akRight]
9 months ago
Caption = 'start console'
Font.Height = -18
9 months ago
Font.Name = 'Open Sans'
OnClick = Button4Click
ParentFont = False
TabOrder = 3
end
object Label4: TLabel
Left = 24
Height = 24
Top = 80
Width = 223
9 months ago
Caption = 'IOW COMPUTE SERVERS'
Font.Color = clGreen
Font.Height = -18
9 months ago
Font.Name = 'Open Sans'
Font.Style = [fsBold]
ParentColor = False
9 months ago
ParentFont = False
end
object Button5: TButton
Left = 1071
Height = 31
Top = 176
Width = 208
Anchors = [akTop, akRight]
9 months ago
Caption = 'start console via xpra'
Font.Height = -18
9 months ago
Font.Name = 'Open Sans'
OnClick = Button5Click
ParentFont = False
TabOrder = 4
end
object Shape2: TShape
Left = 16
Height = 64
Top = 8
Width = 1272
Anchors = [akTop, akLeft, akRight]
9 months ago
Brush.Color = clSilver
Pen.Style = psClear
end
object Label5: TLabel
Left = 24
Height = 24
Top = 8
Width = 54
9 months ago
Caption = 'LINKS'
Font.Color = clGreen
Font.Height = -18
9 months ago
Font.Name = 'Open Sans'
Font.Style = [fsBold]
ParentColor = False
9 months ago
ParentFont = False
end
object Button1: TButton
Left = 24
Height = 31
Top = 32
Width = 142
9 months ago
Caption = 'beginners'' intro'
Font.Height = -18
9 months ago
Font.Name = 'Open Sans'
OnClick = Button1Click
ParentFont = False
TabOrder = 5
end
object Button6: TButton
Left = 168
Height = 31
Top = 32
Width = 142
9 months ago
Caption = 'phywiki'
Font.Height = -18
9 months ago
Font.Name = 'Open Sans'
OnClick = Button6Click
ParentFont = False
TabOrder = 6
end
object Button7: TButton
Left = 312
Height = 31
Top = 32
Width = 142
9 months ago
Caption = 'webmail'
Font.Height = -18
9 months ago
Font.Name = 'Open Sans'
OnClick = Button7Click
ParentFont = False
TabOrder = 7
end
object Button8: TButton
Left = 456
Height = 31
Top = 32
Width = 142
9 months ago
Caption = 'chat'
Font.Height = -18
9 months ago
Font.Name = 'Open Sans'
OnClick = Button8Click
ParentFont = False
TabOrder = 8
end
object Button9: TButton
Left = 600
Height = 31
Top = 32
Width = 142
9 months ago
Caption = 'owncloud'
Font.Height = -18
9 months ago
Font.Name = 'Open Sans'
OnClick = Button9Click
ParentFont = False
TabOrder = 9
end
object Button10: TButton
Left = 744
Height = 31
Top = 32
Width = 142
9 months ago
Caption = 'public drive'
Font.Height = -18
9 months ago
Font.Name = 'Open Sans'
OnClick = Button10Click
ParentFont = False
TabOrder = 10
end
object Button11: TButton
Left = 888
Height = 31
Top = 32
Width = 142
9 months ago
Caption = 'git server'
Font.Height = -18
9 months ago
Font.Name = 'Open Sans'
OnClick = Button11Click
ParentFont = False
TabOrder = 11
end
object Label6: TLabel
Left = 24
Height = 24
Top = 224
Width = 52
9 months ago
Caption = 'phy-2'
Font.Height = -18
9 months ago
Font.Name = 'Open Sans'
Font.Style = [fsBold]
ParentColor = False
9 months ago
ParentFont = False
end
object LabelCPU2: TLabel
Left = 112
Height = 24
Top = 224
Width = 147
9 months ago
Caption = 'CPUs busy (total):'
Font.Height = -18
9 months ago
Font.Name = 'Open Sans'
ParentColor = False
9 months ago
ParentFont = False
end
object LabelMEM2: TLabel
Left = 112
Height = 24
Top = 256
Width = 142
9 months ago
Caption = 'RAM used (total):'
Font.Height = -18
9 months ago
Font.Name = 'Open Sans'
ParentColor = False
9 months ago
ParentFont = False
end
object Button12: TButton
Left = 112
Height = 31
Top = 288
Width = 155
9 months ago
Caption = 'more info...'
Font.Height = -18
9 months ago
Font.Name = 'Open Sans'
OnClick = Button12Click
ParentFont = False
TabOrder = 12
end
object Memo2: TMemo
Left = 496
Height = 95
Top = 224
Width = 566
Anchors = [akTop, akLeft, akRight]
Font.Height = -18
9 months ago
Font.Name = 'Open Sans'
Lines.Strings = (
'getm (by klingbei) uses 50 cores (expected end 2023-10-10)'
'cdo merge (by thomas) uses 2 cores (expected end 2023-10-10)'
)
OnChange = Memo1Change
ParentFont = False
ReadOnly = True
ScrollBars = ssBoth
TabOrder = 13
WordWrap = False
end
object Button13: TButton
Left = 1072
Height = 31
Top = 224
Width = 206
Anchors = [akTop, akRight]
9 months ago
Caption = 'start jupyter lab'
Font.Height = -18
9 months ago
Font.Name = 'Open Sans'
OnClick = Button13Click
ParentFont = False
TabOrder = 14
end
object Button14: TButton
Left = 1071
Height = 31
Top = 256
Width = 208
Anchors = [akTop, akRight]
9 months ago
Caption = 'start console'
Font.Height = -18
9 months ago
Font.Name = 'Open Sans'
OnClick = Button14Click
ParentFont = False
TabOrder = 15
end
object Button15: TButton
Left = 1071
Height = 31
Top = 288
Width = 208
Anchors = [akTop, akRight]
9 months ago
Caption = 'start console via xpra'
Font.Height = -18
9 months ago
Font.Name = 'Open Sans'
OnClick = Button15Click
ParentFont = False
TabOrder = 16
end
object Label9: TLabel
Left = 24
Height = 24
Top = 336
Width = 52
9 months ago
Caption = 'phy-3'
Font.Height = -18
9 months ago
Font.Name = 'Open Sans'
Font.Style = [fsBold]
ParentColor = False
9 months ago
ParentFont = False
end
object LabelCPU3: TLabel
Left = 112
Height = 24
Top = 336
Width = 147
9 months ago
Caption = 'CPUs busy (total):'
Font.Height = -18
9 months ago
Font.Name = 'Open Sans'
ParentColor = False
9 months ago
ParentFont = False
end
object LabelMEM3: TLabel
Left = 112
Height = 24
Top = 368
Width = 142
9 months ago
Caption = 'RAM used (total):'
Font.Height = -18
9 months ago
Font.Name = 'Open Sans'
ParentColor = False
9 months ago
ParentFont = False
end
object Button16: TButton
Left = 112
Height = 31
Top = 400
Width = 155
9 months ago
Caption = 'more info...'
Font.Height = -18
9 months ago
Font.Name = 'Open Sans'
OnClick = Button16Click
ParentFont = False
TabOrder = 17
end
object Memo3: TMemo
Left = 496
Height = 95
Top = 336
Width = 566
Anchors = [akTop, akLeft, akRight]
Font.Height = -18
9 months ago
Font.Name = 'Open Sans'
Lines.Strings = (
'getm (by klingbei) uses 50 cores (expected end 2023-10-10)'
'cdo merge (by thomas) uses 2 cores (expected end 2023-10-10)'
)
OnChange = Memo1Change
ParentFont = False
ReadOnly = True
ScrollBars = ssBoth
TabOrder = 18
WordWrap = False
end
object Button17: TButton
Left = 1072
Height = 31
Top = 336
Width = 206
Anchors = [akTop, akRight]
9 months ago
Caption = 'start jupyter lab'
Font.Height = -18
9 months ago
Font.Name = 'Open Sans'
OnClick = Button17Click
ParentFont = False
TabOrder = 19
end
object Button18: TButton
Left = 1071
Height = 31
Top = 368
Width = 208
Anchors = [akTop, akRight]
9 months ago
Caption = 'start console'
Font.Height = -18
9 months ago
Font.Name = 'Open Sans'
OnClick = Button18Click
ParentFont = False
TabOrder = 20
end
object Button19: TButton
Left = 1071
Height = 31
Top = 400
Width = 208
Anchors = [akTop, akRight]
9 months ago
Caption = 'start console via xpra'
Font.Height = -18
9 months ago
Font.Name = 'Open Sans'
OnClick = Button19Click
ParentFont = False
TabOrder = 21
end
object Shape3: TShape
Left = 16
Height = 136
Top = 448
Width = 1272
Anchors = [akTop, akLeft, akRight]
9 months ago
Brush.Color = clSilver
Pen.Style = psClear
end
object Label12: TLabel
Left = 24
Height = 24
Top = 480
Width = 52
9 months ago
Caption = 'phy-4'
Font.Height = -18
9 months ago
Font.Name = 'Open Sans'
Font.Style = [fsBold]
ParentColor = False
9 months ago
ParentFont = False
end
object LabelCPU4: TLabel
Left = 112
Height = 24
Top = 480
Width = 147
9 months ago
Caption = 'CPUs busy (total):'
Font.Height = -18
9 months ago
Font.Name = 'Open Sans'
ParentColor = False
9 months ago
ParentFont = False
end
object LabelMEM4: TLabel
Left = 112
Height = 24
Top = 512
Width = 142
9 months ago
Caption = 'RAM used (total):'
Font.Height = -18
9 months ago
Font.Name = 'Open Sans'
ParentColor = False
9 months ago
ParentFont = False
end
object Button20: TButton
Left = 112
Height = 31
Top = 544
Width = 155
9 months ago
Caption = 'more info...'
Font.Height = -18
9 months ago
Font.Name = 'Open Sans'
OnClick = Button20Click
ParentFont = False
TabOrder = 22
end
object Memo4: TMemo
Left = 496
Height = 95
Top = 480
Width = 566
Anchors = [akTop, akLeft, akRight]
Font.Height = -18
9 months ago
Font.Name = 'Open Sans'
Lines.Strings = (
'getm (by klingbei) uses 50 cores (expected end 2023-10-10)'
'cdo merge (by thomas) uses 2 cores (expected end 2023-10-10)'
)
OnChange = Memo1Change
ParentFont = False
ReadOnly = True
ScrollBars = ssBoth
TabOrder = 23
WordWrap = False
end
object Button21: TButton
Left = 1072
Height = 31
Top = 480
Width = 206
Anchors = [akTop, akRight]
9 months ago
Caption = 'start jupyter lab'
Font.Height = -18
9 months ago
Font.Name = 'Open Sans'
OnClick = Button21Click
ParentFont = False
TabOrder = 24
end
object Button22: TButton
Left = 1071
Height = 31
Top = 512
Width = 208
Anchors = [akTop, akRight]
9 months ago
Caption = 'start console'
Font.Height = -18
9 months ago
Font.Name = 'Open Sans'
OnClick = Button22Click
ParentFont = False
TabOrder = 25
end
object Button23: TButton
Left = 1071
Height = 31
Top = 544
Width = 208
Anchors = [akTop, akRight]
9 months ago
Caption = 'start console via xpra'
Font.Height = -18
9 months ago
Font.Name = 'Open Sans'
OnClick = Button23Click
ParentFont = False
TabOrder = 26
end
object Label15: TLabel
Left = 24
Height = 24
Top = 448
Width = 160
9 months ago
Caption = 'IOW GPU SERVER'
Font.Color = clGreen
Font.Height = -18
9 months ago
Font.Name = 'Open Sans'
Font.Style = [fsBold]
ParentColor = False
9 months ago
ParentFont = False
end
object Shape5: TShape
Left = 16
Height = 248
Top = 592
Width = 1272
Anchors = [akTop, akLeft, akRight]
9 months ago
Brush.Color = clSilver
Pen.Style = psClear
end
object Label16: TLabel
Left = 24
Height = 24
Top = 624
Width = 63
9 months ago
Caption = 'phy-10'
Font.Height = -18
9 months ago
Font.Name = 'Open Sans'
Font.Style = [fsBold]
ParentColor = False
9 months ago
ParentFont = False
end
object LabelCPU5: TLabel
Left = 112
Height = 24
Top = 624
Width = 147
9 months ago
Caption = 'CPUs busy (total):'
Font.Height = -18
9 months ago
Font.Name = 'Open Sans'
ParentColor = False
9 months ago
ParentFont = False
end
object LabelMEM5: TLabel
Left = 112
Height = 24
Top = 656
Width = 142
9 months ago
Caption = 'RAM used (total):'
Font.Height = -18
9 months ago
Font.Name = 'Open Sans'
ParentColor = False
9 months ago
ParentFont = False
end
object Button24: TButton
Left = 112
Height = 31
Top = 688
Width = 155
9 months ago
Caption = 'more info...'
Font.Height = -18
9 months ago
Font.Name = 'Open Sans'
OnClick = Button24Click
ParentFont = False
TabOrder = 27
end
object Memo5: TMemo
Left = 496
Height = 95
Top = 624
Width = 566
Anchors = [akTop, akLeft, akRight]
Font.Height = -18
9 months ago
Font.Name = 'Open Sans'
Lines.Strings = (
'getm (by klingbei) uses 50 cores (expected end 2023-10-10)'
'cdo merge (by thomas) uses 2 cores (expected end 2023-10-10)'
)
OnChange = Memo1Change
ParentFont = False
ReadOnly = True
ScrollBars = ssBoth
TabOrder = 28
WordWrap = False
end
object Button25: TButton
Left = 1072
Height = 31
Top = 624
Width = 206
Anchors = [akTop, akRight]
9 months ago
Caption = 'start jupyter lab'
Font.Height = -18
9 months ago
Font.Name = 'Open Sans'
OnClick = Button25Click
ParentFont = False
TabOrder = 29
end
object Button26: TButton
Left = 1071
Height = 31
Top = 656
Width = 208
Anchors = [akTop, akRight]
9 months ago
Caption = 'start console'
Font.Height = -18
9 months ago
Font.Name = 'Open Sans'
OnClick = Button26Click
ParentFont = False
TabOrder = 30
end
object Button27: TButton
Left = 1071
Height = 31
Top = 688
Width = 208
Anchors = [akTop, akRight]
9 months ago
Caption = 'start console via xpra'
Font.Height = -18
9 months ago
Font.Name = 'Open Sans'
OnClick = Button27Click
ParentFont = False
TabOrder = 31
end
object Label19: TLabel
Left = 24
Height = 24
Top = 592
Width = 180
9 months ago
Caption = 'IOW DATA SERVERS'
Font.Color = clGreen
Font.Height = -18
9 months ago
Font.Name = 'Open Sans'
Font.Style = [fsBold]
ParentColor = False
9 months ago
ParentFont = False
end
object Label20: TLabel
Left = 24
Height = 24
Top = 736
Width = 63
9 months ago
Caption = 'phy-11'
Font.Height = -18
9 months ago
Font.Name = 'Open Sans'
Font.Style = [fsBold]
ParentColor = False
9 months ago
ParentFont = False
end
object LabelCPU6: TLabel
Left = 112
Height = 24
Top = 736
Width = 147
9 months ago
Caption = 'CPUs busy (total):'
Font.Height = -18
9 months ago
Font.Name = 'Open Sans'
ParentColor = False
9 months ago
ParentFont = False
end
object LabelMEM6: TLabel
Left = 112
Height = 24
Top = 768
Width = 142
9 months ago
Caption = 'RAM used (total):'
Font.Height = -18
9 months ago
Font.Name = 'Open Sans'
ParentColor = False
9 months ago
ParentFont = False
end
object Button28: TButton
Left = 112
Height = 31
Top = 800
Width = 155
9 months ago
Caption = 'more info...'
Font.Height = -18
9 months ago
Font.Name = 'Open Sans'
OnClick = Button28Click
ParentFont = False
TabOrder = 32
end
object Memo6: TMemo
Left = 496
Height = 95
Top = 736
Width = 566
Anchors = [akTop, akLeft, akRight]
Font.Height = -18
9 months ago
Font.Name = 'Open Sans'
Lines.Strings = (
'getm (by klingbei) uses 50 cores (expected end 2023-10-10)'
'cdo merge (by thomas) uses 2 cores (expected end 2023-10-10)'
)
OnChange = Memo1Change
ParentFont = False
ReadOnly = True
ScrollBars = ssBoth
TabOrder = 33
WordWrap = False
end
object Button29: TButton
Left = 1072
Height = 31
Top = 736
Width = 206
Anchors = [akTop, akRight]
9 months ago
Caption = 'start jupyter lab'
Font.Height = -18
9 months ago
Font.Name = 'Open Sans'
OnClick = Button29Click
ParentFont = False
TabOrder = 34
end
object Button30: TButton
Left = 1071
Height = 31
Top = 768
Width = 208
Anchors = [akTop, akRight]
9 months ago
Caption = 'start console'
Font.Height = -18
9 months ago
Font.Name = 'Open Sans'
OnClick = Button30Click
ParentFont = False
TabOrder = 35
end
object Button31: TButton
Left = 1071
Height = 31
Top = 800
Width = 208
Anchors = [akTop, akRight]
9 months ago
Caption = 'start console via xpra'
Font.Height = -18
9 months ago
Font.Name = 'Open Sans'
OnClick = Button31Click
ParentFont = False
TabOrder = 36
end
object Shape7: TShape
Left = 16
Height = 120
Top = 848
Width = 1074
9 months ago
Brush.Color = clSilver
Pen.Style = psClear
end
object Label23: TLabel
Left = 24
Height = 24
Top = 848
Width = 219
9 months ago
Caption = 'EXTERNAL RESSOURCES'
Font.Color = clGreen
Font.Height = -18
9 months ago
Font.Name = 'Open Sans'
Font.Style = [fsBold]
ParentColor = False
9 months ago
ParentFont = False
end
object Label24: TLabel
Left = 26
Height = 24
Top = 872
Width = 274
9 months ago
Caption = 'haumea cluster (Uni Rostock)'
Font.Height = -18
9 months ago
Font.Name = 'Open Sans'
Font.Style = [fsBold]
ParentColor = False
9 months ago
ParentFont = False
end
object Button32: TButton
Left = 24
Height = 31
Top = 896
Width = 136
9 months ago
Caption = 'get account...'
Font.Height = -18
9 months ago
Font.Name = 'Open Sans'
OnClick = Button32Click
ParentFont = False
TabOrder = 37
end
object Button33: TButton
Left = 169
Height = 31
Top = 896
Width = 206
9 months ago
Caption = 'start jupyter lab'
Font.Height = -18
9 months ago
Font.Name = 'Open Sans'
OnClick = Button33Click
ParentFont = False
TabOrder = 38
end
object Button34: TButton
Left = 168
Height = 31
Top = 928
Width = 208
9 months ago
Caption = 'start console'
Font.Height = -18
9 months ago
Font.Name = 'Open Sans'
OnClick = Button34Click
ParentFont = False
TabOrder = 39
end
object Label25: TLabel
Left = 456
Height = 24
Top = 872
Width = 200
9 months ago
Caption = 'NHR supercomputers'
Font.Height = -18
9 months ago
Font.Name = 'Open Sans'
Font.Style = [fsBold]
ParentColor = False
9 months ago
ParentFont = False
end
object Button35: TButton
Left = 456
Height = 31
Top = 896
Width = 144
9 months ago
Caption = 'get account...'
Font.Height = -18
9 months ago
Font.Name = 'Open Sans'
OnClick = Button35Click
ParentFont = False
TabOrder = 40
end
object Button36: TButton
Left = 601
Height = 31
Top = 896
Width = 222
9 months ago
Caption = 'start jupyter lab (berlin)'
Font.Height = -18
9 months ago
Font.Name = 'Open Sans'
OnClick = Button36Click
ParentFont = False
TabOrder = 41
end
object Button37: TButton
Left = 601
Height = 31
Top = 928
Width = 222
9 months ago
Caption = 'start console (berlin)'
Font.Height = -18
9 months ago
Font.Name = 'Open Sans'
OnClick = Button37Click
ParentFont = False
TabOrder = 42
end
object Button38: TButton
Left = 832
Height = 31
Top = 896
Width = 240
9 months ago
Caption = 'start jupyter lab (göttingen)'
Font.Height = -18
9 months ago
Font.Name = 'Open Sans'
OnClick = Button38Click
ParentFont = False
TabOrder = 43
end
object Button39: TButton