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

1.1       root        1: object MailForm: TMailForm
                      2:   Left = 670
                      3:   Top = 170
                      4:   Width = 350
                      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
                     24:     Width = 342
                     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
                     40:     object StopButton: TToolButton
                     41:       Left = 23
                     42:       Top = 0
                     43:       Action = MainForm.MailStop
                     44:       ParentShowHint = False
                     45:       ShowHint = True
                     46:     end
                     47:     object RecycleButton: TToolButton
                     48:       Left = 46
                     49:       Top = 0
                     50:       Action = MainForm.MailRecycle
                     51:     end
                     52:     object ToolButton4: TToolButton
                     53:       Left = 69
                     54:       Top = 0
                     55:       Width = 8
                     56:       Caption = 'ToolButton4'
                     57:       ImageIndex = 3
                     58:       Style = tbsSeparator
                     59:     end
                     60:     object ConfigureButton: TToolButton
                     61:       Left = 77
                     62:       Top = 0
                     63:       Action = MainForm.MailConfigure
                     64:     end
                     65:     object ToolButton6: TToolButton
                     66:       Left = 100
                     67:       Top = 0
                     68:       Width = 8
                     69:       Caption = 'ToolButton6'
                     70:       ImageIndex = 5
                     71:       Style = tbsSeparator
                     72:     end
                     73:     object Status: TStaticText
                     74:       Left = 108
                     75:       Top = 0
                     76:       Width = 150
                     77:       Height = 22
                     78:       Hint = 'Mail Server Status'
                     79:       AutoSize = False
                     80:       BorderStyle = sbsSunken
                     81:       Caption = 'Down'
                     82:       TabOrder = 0
                     83:     end
                     84:     object ToolButton1: TToolButton
                     85:       Left = 258
                     86:       Top = 0
                     87:       Width = 8
                     88:       Caption = 'ToolButton1'
                     89:       ImageIndex = 6
                     90:       Style = tbsSeparator
                     91:     end
                     92:     object ProgressBar: TProgressBar
                     93:       Left = 266
                     94:       Top = 0
                     95:       Width = 75
                     96:       Height = 22
                     97:       Hint = 'Mail Server Utilization'
                     98:       Min = 0
                     99:       Max = 100
                    100:       Smooth = True
                    101:       Step = 1
                    102:       TabOrder = 1
                    103:     end
                    104:   end
                    105:   object Log: TMemo
                    106:     Left = 0
                    107:     Top = 25
                    108:     Width = 342
                    109:     Height = 92
                    110:     Align = alClient
                    111:     ReadOnly = True
                    112:     ScrollBars = ssBoth
                    113:     TabOrder = 1
                    114:   end
                    115: end

unix.superglobalmegacorp.com

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