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

1.1       root        1: object MailForm: TMailForm
1.1.1.2 ! root        2:   Left = 735
        !             3:   Top = 317
        !             4:   Width = 480
1.1       root        5:   Height = 150
                      6:   Caption = 'Mail Server'
                      7:   Color = clBtnFace
                      8:   UseDockManager = True
                      9:   DragKind = dkDock
                     10:   DragMode = dmAutomatic
                     11:   Font.Charset = DEFAULT_CHARSET
                     12:   Font.Color = clWindowText
                     13:   Font.Height = -14
                     14:   Font.Name = 'MS Sans Serif'
                     15:   Font.Style = []
                     16:   OldCreateOrder = False
                     17:   Position = poDefault
                     18:   OnHide = FormHide
                     19:   PixelsPerInch = 120
                     20:   TextHeight = 16
                     21:   object ToolBar: TToolBar
                     22:     Left = 0
                     23:     Top = 0
1.1.1.2 ! root       24:     Width = 472
1.1       root       25:     Height = 25
                     26:     Caption = 'ToolBar'
                     27:     EdgeBorders = []
                     28:     Flat = True
                     29:     Images = MainForm.ImageList
                     30:     ParentShowHint = False
                     31:     ShowHint = True
                     32:     TabOrder = 0
                     33:     object StartButton: TToolButton
                     34:       Left = 0
                     35:       Top = 0
                     36:       Action = MainForm.MailStart
                     37:       ParentShowHint = False
                     38:       ShowHint = True
                     39:     end
1.1.1.2 ! root       40:     object LogPauseButton: TToolButton
1.1       root       41:       Left = 23
                     42:       Top = 0
1.1.1.2 ! root       43:       Action = MainForm.MailPause
        !            44:       Style = tbsCheck
        !            45:     end
        !            46:     object StopButton: TToolButton
        !            47:       Left = 46
        !            48:       Top = 0
1.1       root       49:       Action = MainForm.MailStop
                     50:       ParentShowHint = False
                     51:       ShowHint = True
                     52:     end
                     53:     object RecycleButton: TToolButton
1.1.1.2 ! root       54:       Left = 69
1.1       root       55:       Top = 0
                     56:       Action = MainForm.MailRecycle
                     57:     end
                     58:     object ToolButton4: TToolButton
1.1.1.2 ! root       59:       Left = 92
1.1       root       60:       Top = 0
                     61:       Width = 8
                     62:       Caption = 'ToolButton4'
                     63:       ImageIndex = 3
                     64:       Style = tbsSeparator
                     65:     end
                     66:     object ConfigureButton: TToolButton
1.1.1.2 ! root       67:       Left = 100
1.1       root       68:       Top = 0
                     69:       Action = MainForm.MailConfigure
                     70:     end
                     71:     object ToolButton6: TToolButton
1.1.1.2 ! root       72:       Left = 123
1.1       root       73:       Top = 0
                     74:       Width = 8
                     75:       Caption = 'ToolButton6'
                     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 = 'Mail Server Status'
                     85:       AutoSize = False
                     86:       BorderStyle = sbsSunken
                     87:       Caption = 'Down'
                     88:       TabOrder = 0
                     89:     end
                     90:     object ToolButton1: TToolButton
1.1.1.2 ! root       91:       Left = 281
1.1       root       92:       Top = 0
                     93:       Width = 8
                     94:       Caption = 'ToolButton1'
                     95:       ImageIndex = 6
                     96:       Style = tbsSeparator
                     97:     end
                     98:     object ProgressBar: TProgressBar
1.1.1.2 ! root       99:       Left = 289
1.1       root      100:       Top = 0
                    101:       Width = 75
                    102:       Height = 22
                    103:       Hint = 'Mail Server Utilization'
                    104:       Min = 0
                    105:       Max = 100
                    106:       Smooth = True
                    107:       Step = 1
                    108:       TabOrder = 1
                    109:     end
1.1.1.2 ! root      110:     object ToolButton2: TToolButton
        !           111:       Left = 364
        !           112:       Top = 0
        !           113:       Width = 8
        !           114:       Caption = 'ToolButton2'
        !           115:       ImageIndex = 7
        !           116:       Style = tbsSeparator
        !           117:     end
        !           118:     object LogLevelText: TStaticText
        !           119:       Left = 372
        !           120:       Top = 0
        !           121:       Width = 75
        !           122:       Height = 22
        !           123:       Hint = 'Log Level'
        !           124:       AutoSize = False
        !           125:       BorderStyle = sbsSunken
        !           126:       TabOrder = 2
        !           127:     end
        !           128:     object LogLevelUpDown: TUpDown
        !           129:       Left = 447
        !           130:       Top = 0
        !           131:       Width = 16
        !           132:       Height = 22
        !           133:       Hint = 'Log Level Adjustment'
        !           134:       Min = 0
        !           135:       Max = 7
        !           136:       Position = 0
        !           137:       TabOrder = 3
        !           138:       Wrap = False
        !           139:       OnChangingEx = LogLevelUpDownChangingEx
        !           140:     end
1.1       root      141:   end
1.1.1.2 ! root      142:   object Log: TRichEdit
1.1       root      143:     Left = 0
                    144:     Top = 25
1.1.1.2 ! root      145:     Width = 472
1.1       root      146:     Height = 92
                    147:     Align = alClient
1.1.1.2 ! root      148:     Font.Charset = DEFAULT_CHARSET
        !           149:     Font.Color = clWindowText
        !           150:     Font.Height = -14
        !           151:     Font.Name = 'MS Sans Serif'
        !           152:     Font.Style = []
        !           153:     HideScrollBars = False
        !           154:     ParentFont = False
1.1       root      155:     ReadOnly = True
                    156:     ScrollBars = ssBoth
                    157:     TabOrder = 1
1.1.1.2 ! root      158:     WordWrap = False
1.1       root      159:   end
                    160: end

unix.superglobalmegacorp.com

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