object SplitForm: TSplitForm Left = 118 Top = 131 BorderStyle = bsSingle Caption = 'Split' ClientHeight = 314 ClientWidth = 509 Ctl3D = False Color = clOlive Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] OnCreate = FormCreate PixelsPerInch = 96 TextHeight = 13 object Panel1: TPanel Left = 0 Top = 0 Width = 509 Height = 314 Align = alClient BevelOuter = bvNone BorderStyle = bsSingle Caption = 'Panel1' Color = clBlack TabOrder = 0 object Title: TLabel Left = 0 Top = 0 Width = 507 Height = 312 Align = alClient Alignment = taCenter Caption = 'File Splitter' Color = clBlack Font.Color = clGreen Font.Height = -96 Font.Name = 'Times New Roman' Font.Style = [fsBold, fsItalic] ParentColor = False ParentFont = False end object Label1: TLabel Left = 280 Top = 120 Width = 125 Height = 16 Caption = 'Split file size (Kb):' Font.Color = clWhite Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object FileToSplitLabel: TLabel Left = 120 Top = 167 Width = 369 Height = 25 AutoSize = False Caption = 'unknown' Color = clWhite Font.Color = clBlack Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentColor = False ParentFont = False OnMouseDown = FileToSplitLabelMouseDown end object Label3: TLabel Left = 24 Top = 166 Width = 81 Height = 16 Caption = 'File to split:' Font.Color = clWhite Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object SplitFileSizeEdit: TEdit Left = 416 Top = 120 Width = 73 Height = 25 AutoSize = False Font.Color = clBlack Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False TabOrder = 0 end object StartButton: TButton Left = 24 Top = 216 Width = 217 Height = 57 Caption = '&Start splitting' Font.Color = clBlack Font.Height = -19 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 1 OnClick = StartButtonClick end object HideButton: TButton Left = 272 Top = 216 Width = 209 Height = 57 Caption = '&Hide' Font.Color = clBlack Font.Height = -19 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 2 OnClick = HideButtonClick end end object OpenDialog1: TOpenDialog FileEditStyle = fsEdit Filter = 'All files| *.*|Applications|*.exe; *.com; *.dll|Text files|*.txt' + '; *.doc; *.rtf|Archives|*.zip; *.arj; *.lha; *.arc' Left = 482 Top = 2 end object Timer1: TTimer Interval = 100 OnTimer = Timer1Timer Left = 1 Top = 1 end end