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

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

unix.superglobalmegacorp.com

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