home *** CD-ROM | disk | FTP | other *** search
- object addsomething: Taddsomething
- Left = 252
- Top = 192
- Width = 255
- Height = 121
- Caption = 'Add New Folder'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Position = poScreenCenter
- OnClose = FormClose
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 13
- object Bevel1: TBevel
- Left = 8
- Top = 8
- Width = 233
- Height = 81
- end
- object Label2: TLabel
- Left = 16
- Top = 16
- Width = 186
- Height = 13
- Caption = 'Please enter a name for this new folder:'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object BitBtn1: TBitBtn
- Left = 78
- Top = 60
- Width = 75
- Height = 25
- TabOrder = 1
- OnClick = BitBtn1Click
- Kind = bkOK
- end
- object BitBtn2: TBitBtn
- Left = 158
- Top = 60
- Width = 75
- Height = 25
- TabOrder = 2
- OnClick = BitBtn2Click
- Kind = bkCancel
- end
- object nametoadd: TEdit
- Left = 16
- Top = 32
- Width = 217
- Height = 21
- TabOrder = 0
- end
- end
-