Annotation of sbbs/sbbs3/ctrl/ftpformunit.dfm, revision 1.1.1.1

1.1       root        1: object FtpForm: TFtpForm
                      2:   Left = 322
                      3:   Top = 143
                      4:   Width = 350
                      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 = -10
                     13:   Font.Name = 'MS Sans Serif'
                     14:   Font.Style = []
                     15:   OldCreateOrder = False
                     16:   OnHide = FormHide
                     17:   OnShow = FormShow
                     18:   PixelsPerInch = 96
                     19:   TextHeight = 13
                     20:   object ToolBar: TToolBar
                     21:     Left = 0
                     22:     Top = 0
                     23:     Width = 342
                     24:     Height = 25
                     25:     Caption = 'ToolBar'
                     26:     EdgeBorders = []
                     27:     EdgeInner = esLowered
                     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.FtpStart
                     37:     end
                     38:     object StopButton: TToolButton
                     39:       Left = 23
                     40:       Top = 0
                     41:       Action = MainForm.FtpStop
                     42:     end
                     43:     object ToolButton1: TToolButton
                     44:       Left = 46
                     45:       Top = 0
                     46:       Width = 8
                     47:       Caption = 'ToolButton1'
                     48:       ImageIndex = 3
                     49:       Style = tbsSeparator
                     50:     end
                     51:     object ConfigureButton: TToolButton
                     52:       Left = 54
                     53:       Top = 0
                     54:       Action = MainForm.FtpConfigure
                     55:     end
                     56:     object ToolButton2: TToolButton
                     57:       Left = 77
                     58:       Top = 0
                     59:       Width = 8
                     60:       Caption = 'ToolButton2'
                     61:       ImageIndex = 5
                     62:       Style = tbsSeparator
                     63:     end
                     64:     object Status: TStaticText
                     65:       Left = 85
                     66:       Top = 0
                     67:       Width = 150
                     68:       Height = 22
                     69:       Hint = 'FTP Server Status'
                     70:       AutoSize = False
                     71:       BorderStyle = sbsSunken
                     72:       Caption = 'Status'
                     73:       ParentShowHint = False
                     74:       ShowHint = True
                     75:       TabOrder = 0
                     76:     end
                     77:     object ToolButton3: TToolButton
                     78:       Left = 235
                     79:       Top = 0
                     80:       Width = 8
                     81:       Caption = 'ToolButton3'
                     82:       ImageIndex = 6
                     83:       Style = tbsSeparator
                     84:     end
                     85:     object ProgressBar: TProgressBar
                     86:       Left = 243
                     87:       Top = 0
                     88:       Width = 75
                     89:       Height = 22
                     90:       Hint = 'FTP Server Utilization'
                     91:       Min = 0
                     92:       Max = 100
                     93:       Smooth = True
                     94:       Step = 1
                     95:       TabOrder = 1
                     96:     end
                     97:   end
                     98:   object Log: TMemo
                     99:     Left = 0
                    100:     Top = 25
                    101:     Width = 342
                    102:     Height = 98
                    103:     Align = alClient
                    104:     ReadOnly = True
                    105:     ScrollBars = ssBoth
                    106:     TabOrder = 1
                    107:   end
                    108: end

unix.superglobalmegacorp.com

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