unit1.~dfm

《Delphi 7应用编程150例》源码（全）

object frmMain: TfrmMain
  Left = 192
  Top = 107
  Width = 257
  Height = 301
  Caption = #23646#24615
  Color = clBtnFace
  Font.Charset = ANSI_CHARSET
  Font.Color = clWindowText
  Font.Height = -14
  Font.Name = 'Times New Roman'
  Font.Style = []
  OldCreateOrder = False
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 16
  object TabbedNotebook1: TTabbedNotebook
    Left = 8
    Top = 8
    Width = 233
    Height = 225
    TabFont.Charset = ANSI_CHARSET
    TabFont.Color = clBtnText
    TabFont.Height = -14
    TabFont.Name = 'Times New Roman'
    TabFont.Style = []
    TabOrder = 0
    object TTabPage
      Left = 4
      Top = 27
      Caption = #24120#35268
      object Shape1: TShape
        Left = 8
        Top = 48
        Width = 209
        Height = 3
        Brush.Color = clGray
        Pen.Color = clGray
        Shape = stRoundRect
      end
      object Shape2: TShape
        Left = 8
        Top = 121
        Width = 209
        Height = 3
        Brush.Color = clGray
        Pen.Color = clGray
        Shape = stRoundRect
      end
      object Label1: TLabel
        Left = 8
        Top = 142
        Width = 42
        Height = 16
        Caption = #23646#24615#65306
      end
      object lblPosition: TLabel
        Left = 8
        Top = 65
        Width = 42
        Height = 16
        Caption = #20301#32622#65306
      end
      object lblSize: TLabel
        Left = 8
        Top = 87
        Width = 42
        Height = 16
        Caption = #22823#23567#65306
      end
      object lblName: TLabel
        Left = 8
        Top = 16
        Width = 42
        Height = 16
        Caption = #21517#31216#65306
      end
      object ReadOnly: TCheckBox
        Left = 69
        Top = 138
        Width = 57
        Height = 25
        Caption = #21482#35835
        TabOrder = 0
      end
      object Hidden: TCheckBox
        Left = 149
        Top = 138
        Width = 57
        Height = 25
        Caption = #38544#34255
        TabOrder = 1
      end
      object Archive: TCheckBox
        Left = 69
        Top = 162
        Width = 57
        Height = 25
        Caption = #23384#26723
        TabOrder = 2
      end
      object System: TCheckBox
        Left = 149
        Top = 162
        Width = 57
        Height = 25
        Caption = #31995#32479
        TabOrder = 3
      end
    end
  end
  object BtnClose: TBitBtn
    Left = 168
    Top = 240
    Width = 73
    Height = 25
    TabOrder = 1
    Kind = bkClose
  end
  object OpenDialog: TOpenDialog
    Left = 104
    Top = 104
  end
end