Annotation of sbbs/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 = -11
                     14:   Font.Name = 'MS Sans Serif'
                     15:   Font.Style = []
                     16:   OldCreateOrder = False
                     17:   Position = poDefault
                     18:   OnHide = FormHide
                     19:   OnShow = FormShow
                     20:   PixelsPerInch = 96
                     21:   TextHeight = 13
                     22:   object ToolBar: TToolBar
                     23:     Left = 0
                     24:     Top = 0
                     25:     Width = 342
                     26:     Height = 25
                     27:     Caption = 'ToolBar'
                     28:     EdgeBorders = []
                     29:     Flat = True
                     30:     Images = MainForm.ImageList
                     31:     ParentShowHint = False
                     32:     ShowHint = True
                     33:     TabOrder = 0
                     34:     object StartButton: TToolButton
                     35:       Left = 0
                     36:       Top = 0
                     37:       Action = MainForm.MailStart
                     38:       ParentShowHint = False
                     39:       ShowHint = True
                     40:     end
                     41:     object StopButton: TToolButton
                     42:       Left = 23
                     43:       Top = 0
                     44:       Action = MainForm.MailStop
                     45:       ParentShowHint = False
                     46:       ShowHint = True
                     47:     end
                     48:     object ToolButton4: TToolButton
                     49:       Left = 46
                     50:       Top = 0
                     51:       Width = 8
                     52:       Caption = 'ToolButton4'
                     53:       ImageIndex = 3
                     54:       Style = tbsSeparator
                     55:     end
                     56:     object ConfigureButton: TToolButton
                     57:       Left = 54
                     58:       Top = 0
                     59:       Action = MainForm.MailConfigure
                     60:     end
                     61:     object ToolButton6: TToolButton
                     62:       Left = 77
                     63:       Top = 0
                     64:       Width = 8
                     65:       Caption = 'ToolButton6'
                     66:       ImageIndex = 5
                     67:       Style = tbsSeparator
                     68:     end
                     69:     object Status: TStaticText
                     70:       Left = 85
                     71:       Top = 0
                     72:       Width = 150
                     73:       Height = 22
                     74:       Hint = 'Mail Server Status'
                     75:       AutoSize = False
                     76:       BorderStyle = sbsSunken
                     77:       Caption = 'Status'
                     78:       TabOrder = 0
                     79:     end
                     80:     object ToolButton1: TToolButton
                     81:       Left = 235
                     82:       Top = 0
                     83:       Width = 8
                     84:       Caption = 'ToolButton1'
                     85:       ImageIndex = 6
                     86:       Style = tbsSeparator
                     87:     end
                     88:     object ProgressBar: TProgressBar
                     89:       Left = 243
                     90:       Top = 0
                     91:       Width = 75
                     92:       Height = 22
                     93:       Hint = 'Mail Server Utilization'
                     94:       Min = 0
                     95:       Max = 100
                     96:       Smooth = True
                     97:       Step = 1
                     98:       TabOrder = 1
                     99:     end
                    100:   end
                    101:   object Log: TMemo
                    102:     Left = 0
                    103:     Top = 25
                    104:     Width = 342
                    105:     Height = 98
                    106:     Align = alClient
                    107:     ReadOnly = True
                    108:     ScrollBars = ssBoth
                    109:     TabOrder = 1
                    110:   end
                    111: end

unix.superglobalmegacorp.com

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