Annotation of sbbs/src/sbbs3/ctrl/servicesformunit.dfm, revision 1.1.1.2

1.1       root        1: object ServicesForm: TServicesForm
1.1.1.2 ! root        2:   Left = 387
        !             3:   Top = 289
        !             4:   Width = 737
        !             5:   Height = 208
1.1       root        6:   Caption = 'Services'
                      7:   Color = clBtnFace
                      8:   DragKind = dkDock
                      9:   Font.Charset = DEFAULT_CHARSET
                     10:   Font.Color = clWindowText
                     11:   Font.Height = -13
                     12:   Font.Name = 'MS Sans Serif'
                     13:   Font.Style = []
                     14:   OldCreateOrder = False
                     15:   OnHide = FormHide
                     16:   PixelsPerInch = 120
                     17:   TextHeight = 16
                     18:   object ToolBar: TToolBar
                     19:     Left = 0
                     20:     Top = 0
1.1.1.2 ! root       21:     Width = 729
1.1       root       22:     Height = 25
                     23:     Caption = 'ToolBar'
                     24:     EdgeBorders = []
                     25:     Flat = True
                     26:     Images = MainForm.ImageList
                     27:     ParentShowHint = False
                     28:     ShowHint = True
1.1.1.2 ! root       29:     TabOrder = 0
1.1       root       30:     object StartButton: TToolButton
                     31:       Left = 0
                     32:       Top = 0
                     33:       Action = MainForm.ServicesStart
                     34:       Grouped = True
                     35:       ParentShowHint = False
                     36:       ShowHint = True
                     37:     end
1.1.1.2 ! root       38:     object LogPauseButton: TToolButton
1.1       root       39:       Left = 23
                     40:       Top = 0
1.1.1.2 ! root       41:       Action = MainForm.ServicesPause
        !            42:     end
        !            43:     object StopButton: TToolButton
        !            44:       Left = 46
        !            45:       Top = 0
1.1       root       46:       Action = MainForm.ServicesStop
                     47:       Grouped = True
                     48:       ParentShowHint = False
                     49:       ShowHint = True
                     50:     end
                     51:     object RecycleButton: TToolButton
1.1.1.2 ! root       52:       Left = 69
1.1       root       53:       Top = 0
                     54:       Action = MainForm.ServicesRecycle
                     55:     end
                     56:     object ToolButton1: TToolButton
1.1.1.2 ! root       57:       Left = 92
1.1       root       58:       Top = 0
                     59:       Width = 8
                     60:       Caption = 'ToolButton1'
                     61:       ImageIndex = 1
                     62:       Style = tbsSeparator
                     63:     end
                     64:     object ConfigureButton: TToolButton
1.1.1.2 ! root       65:       Left = 100
1.1       root       66:       Top = 0
                     67:       Action = MainForm.ServicesConfigure
                     68:       ParentShowHint = False
                     69:       ShowHint = True
                     70:     end
                     71:     object ToolButton2: TToolButton
1.1.1.2 ! root       72:       Left = 123
1.1       root       73:       Top = 0
                     74:       Width = 8
                     75:       Caption = 'ToolButton2'
                     76:       ImageIndex = 5
                     77:       Style = tbsSeparator
                     78:     end
                     79:     object Status: TStaticText
1.1.1.2 ! root       80:       Left = 131
1.1       root       81:       Top = 0
                     82:       Width = 150
                     83:       Height = 22
                     84:       Hint = 'Services Status'
                     85:       Align = alClient
                     86:       AutoSize = False
                     87:       BorderStyle = sbsSunken
                     88:       Caption = 'Down'
                     89:       TabOrder = 0
                     90:     end
1.1.1.2 ! root       91:     object ToolButton3: TToolButton
        !            92:       Left = 281
        !            93:       Top = 0
        !            94:       Width = 8
        !            95:       Caption = 'ToolButton3'
        !            96:       ImageIndex = 6
        !            97:       Style = tbsSeparator
        !            98:     end
        !            99:     object LogLevelText: TStaticText
        !           100:       Left = 289
        !           101:       Top = 0
        !           102:       Width = 75
        !           103:       Height = 22
        !           104:       Hint = 'Log Level'
        !           105:       AutoSize = False
        !           106:       BorderStyle = sbsSunken
        !           107:       TabOrder = 1
        !           108:     end
        !           109:     object LogLevelUpDown: TUpDown
        !           110:       Left = 364
        !           111:       Top = 0
        !           112:       Width = 16
        !           113:       Height = 22
        !           114:       Hint = 'Log Level Adjustment'
        !           115:       Min = 0
        !           116:       Max = 7
        !           117:       Position = 0
        !           118:       TabOrder = 2
        !           119:       Wrap = False
        !           120:       OnChangingEx = LogLevelUpDownChangingEx
        !           121:     end
        !           122:   end
        !           123:   object Log: TRichEdit
        !           124:     Left = 0
        !           125:     Top = 25
        !           126:     Width = 729
        !           127:     Height = 150
        !           128:     Align = alClient
        !           129:     Font.Charset = DEFAULT_CHARSET
        !           130:     Font.Color = clWindowText
        !           131:     Font.Height = -14
        !           132:     Font.Name = 'MS Sans Serif'
        !           133:     Font.Style = []
        !           134:     HideScrollBars = False
        !           135:     ParentFont = False
        !           136:     ReadOnly = True
        !           137:     ScrollBars = ssBoth
        !           138:     TabOrder = 1
        !           139:     WordWrap = False
1.1       root      140:   end
                    141: end

unix.superglobalmegacorp.com

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.