u_form1.dfm

很好地delphi书籍源码

object Form1: TForm1
  Left = 339
  Top = 159
  BorderStyle = bsSingle
  Caption = #25991#20214#20998#21106#22120
  ClientHeight = 273
  ClientWidth = 405
  Color = clBtnFace
  Font.Charset = ANSI_CHARSET
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 13
  object PageControl1: TPageControl
    Left = 0
    Top = 0
    Width = 405
    Height = 273
    ActivePage = TabSheet1
    Align = alClient
    Style = tsFlatButtons
    TabOrder = 0
    object TabSheet1: TTabSheet
      Caption = #20998#21106
      object GroupBox1: TGroupBox
        Left = 0
        Top = 0
        Width = 397
        Height = 171
        Align = alTop
        TabOrder = 0
        object Label1: TLabel
          Left = 22
          Top = 20
          Width = 39
          Height = 13
          Caption = #28304#25991#20214
        end
        object Label2: TLabel
          Left = 14
          Top = 44
          Width = 52
          Height = 13
          Caption = #23384#36142#30446#24405
        end
        object Label3: TLabel
          Left = 14
          Top = 72
          Width = 52
          Height = 13
          Caption = #21333#30879#23481#37327
        end
        object FileSpeedButton: TSpeedButton
          Left = 302
          Top = 18
          Width = 23
          Height = 22
          Caption = '...'
          OnClick = FileSpeedButtonClick
        end
        object DirSpeedButton: TSpeedButton
          Left = 302
          Top = 44
          Width = 23
          Height = 22
          Caption = '...'
          OnClick = DirSpeedButtonClick
        end
        object Label5: TLabel
          Left = 16
          Top = 104
          Width = 52
          Height = 13
          Caption = #20999#29255#25991#20214
        end
        object Label4: TLabel
          Left = 196
          Top = 74
          Width = 14
          Height = 13
          Caption = 'KB'
        end
        object Label6: TLabel
          Left = 22
          Top = 138
          Width = 222
          Height = 13
          Caption = #27880#65306'1 GB=1024 MB ,  1 MB=1024 KB'
        end
        object LargeFileEdit: TEdit
          Left = 68
          Top = 18
          Width = 233
          Height = 21
          TabOrder = 0
        end
        object DirEdit: TEdit
          Left = 68
          Top = 42
          Width = 231
          Height = 21
          TabOrder = 1
        end
        object UnitSpinEdit: TSpinEdit
          Left = 70
          Top = 70
          Width = 123
          Height = 22
          MaxValue = 2100000000
          MinValue = 720
          TabOrder = 2
          Value = 1440
        end
        object SmallFileEdit: TEdit
          Left = 70
          Top = 100
          Width = 119
          Height = 21
          TabOrder = 3
          Text = 'temp'
        end
      end
      object DivideButton: TButton
        Left = 104
        Top = 182
        Width = 63
        Height = 23
        Caption = #20998#21106
        TabOrder = 1
        OnClick = DivideButtonClick
      end
      object ProgressBar1: TProgressBar
        Left = 0
        Top = 219
        Width = 397
        Height = 23
        Align = alBottom
        Smooth = True
        TabOrder = 2
      end
      object ExitButton: TButton
        Left = 208
        Top = 182
        Width = 63
        Height = 23
        Caption = #36864#20986
        TabOrder = 3
        OnClick = ExitButtonClick
      end
    end
    object TabSheet2: TTabSheet
      Caption = #21512#24182
      ImageIndex = 1
      object ChoiceButton: TButton
        Left = 136
        Top = 174
        Width = 69
        Height = 23
        Caption = #25171#24320
        TabOrder = 0
        OnClick = ChoiceButtonClick
      end
      object RestoreButton: TButton
        Left = 216
        Top = 174
        Width = 69
        Height = 23
        Caption = #21512#24182' '
        TabOrder = 1
        OnClick = RestoreButtonClick
      end
      object ListBox1: TListBox
        Left = 0
        Top = 0
        Width = 397
        Height = 161
        Align = alTop
        BevelInner = bvSpace
        BevelKind = bkSoft
        BorderStyle = bsNone
        Ctl3D = False
        ItemHeight = 13
        ParentCtl3D = False
        TabOrder = 2
      end
      object ProgressBar2: TProgressBar
        Left = 0
        Top = 219
        Width = 397
        Height = 23
        Align = alBottom
        Smooth = True
        TabOrder = 3
      end
    end
  end
  object OpenDlg1: TOpenDialog
    Left = 204
    Top = 6
  end
  object OpenDlg2: TOpenDialog
    Left = 236
    Top = 6
  end
  object SaveDlg: TSaveDialog
    Left = 268
    Top = 6
  end
end