thing_base.dfm

delphi的一个开发实例

          object Panel14: TPanel
            Left = 0
            Top = 145
            Width = 659
            Height = 512
            Align = alClient
            BevelOuter = bvNone
            Color = clSkyBlue
            TabOrder = 2
            object DBGrid1: TDBGrid
              Left = 0
              Top = 0
              Width = 659
              Height = 512
              Align = alClient
              Color = clSkyBlue
              FixedColor = clSkyBlue
              Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
              ReadOnly = True
              TabOrder = 0
              TitleFont.Charset = GB2312_CHARSET
              TitleFont.Color = clWindowText
              TitleFont.Height = -13
              TitleFont.Name = #23435#20307
              TitleFont.Style = []
              OnCellClick = DBGrid1CellClick
            end
          end
        end
      end
      object TabSh2: TTabSheet
        Caption = #20869#37096#32844#21592
        ImageIndex = 1
        object Panel15: TPanel
          Left = 0
          Top = 0
          Width = 185
          Height = 657
          Align = alLeft
          BorderStyle = bsSingle
          Color = clSkyBlue
          TabOrder = 0
          object Panel16: TPanel
            Left = 1
            Top = 1
            Width = 179
            Height = 33
            Align = alTop
            BevelOuter = bvNone
            Color = clSkyBlue
            TabOrder = 0
          end
          object TreeView2: TTreeView
            Left = 1
            Top = 34
            Width = 179
            Height = 618
            Align = alClient
            Color = clSkyBlue
            Indent = 19
            StateImages = ImageList1
            TabOrder = 1
            OnClick = TreeView2Click
          end
        end
        object Panel17: TPanel
          Left = 185
          Top = 0
          Width = 659
          Height = 657
          Align = alClient
          Color = clSkyBlue
          TabOrder = 1
          object Panel18: TPanel
            Left = 1
            Top = 1
            Width = 657
            Height = 267
            Align = alTop
            BevelOuter = bvNone
            Color = clSkyBlue
            TabOrder = 0
            object Label1: TLabel
              Left = 264
              Top = 64
              Width = 65
              Height = 13
              Caption = #21592#24037#24615#21035#65306
            end
            object Label2: TLabel
              Left = 8
              Top = 95
              Width = 65
              Height = 13
              Caption = #20986#29983#26085#26399#65306
            end
            object Label3: TLabel
              Left = 264
              Top = 95
              Width = 65
              Height = 13
              Caption = #21592#24037#23398#21382#65306
            end
            object Label4: TLabel
              Left = 8
              Top = 214
              Width = 65
              Height = 13
              Caption = #23601#32844#26085#26399#65306
            end
            object Label5: TLabel
              Left = 264
              Top = 214
              Width = 65
              Height = 13
              Caption = #29616#20219#32844#21153#65306
            end
            object Label6: TLabel
              Left = 8
              Top = 245
              Width = 65
              Height = 13
              Caption = #26159#21542#22312#32844#65306
            end
            object Edit4: TLabeledEdit
              Left = 81
              Top = 30
              Width = 150
              Height = 21
              EditLabel.Width = 65
              EditLabel.Height = 13
              EditLabel.Caption = #25152#23646#37096#38376#65306
              LabelPosition = lpLeft
              LabelSpacing = 3
              ReadOnly = True
              TabOrder = 0
            end
            object Edit5: TLabeledEdit
              Left = 335
              Top = 30
              Width = 150
              Height = 21
              EditLabel.Width = 65
              EditLabel.Height = 13
              EditLabel.Caption = #21592#24037#32534#21495#65306
              LabelPosition = lpLeft
              LabelSpacing = 3
              TabOrder = 1
            end
            object Edit6: TLabeledEdit
              Left = 81
              Top = 60
              Width = 150
              Height = 21
              EditLabel.Width = 65
              EditLabel.Height = 13
              EditLabel.Caption = #21592#24037#22995#21517#65306
              LabelPosition = lpLeft
              LabelSpacing = 3
              TabOrder = 2
            end
            object Edit7: TComboBox
              Left = 335
              Top = 60
              Width = 150
              Height = 21
              Color = clSkyBlue
              ItemHeight = 13
              TabOrder = 3
              Items.Strings = (
                #30007
                #22899)
            end
            object Edit10: TLabeledEdit
              Left = 81
              Top = 120
              Width = 150
              Height = 21
              EditLabel.Width = 65
              EditLabel.Height = 13
              EditLabel.Caption = #36523#20221#35777#21495#65306
              LabelPosition = lpLeft
              LabelSpacing = 3
              TabOrder = 4
            end
            object Edit12: TLabeledEdit
              Left = 81
              Top = 150
              Width = 405
              Height = 21
              EditLabel.Width = 65
              EditLabel.Height = 13
              EditLabel.Caption = #23478#24237#20303#22336#65306
              LabelPosition = lpLeft
              LabelSpacing = 3
              TabOrder = 5
            end
            object Edit11: TLabeledEdit
              Left = 335
              Top = 121
              Width = 150
              Height = 21
              EditLabel.Width = 67
              EditLabel.Height = 13
              EditLabel.Caption = #31821'    '#36143#65306
              LabelPosition = lpLeft
              LabelSpacing = 3
              TabOrder = 6
            end
            object Edit14: TLabeledEdit
              Left = 335
              Top = 180
              Width = 150
              Height = 21
              EditLabel.Width = 65
              EditLabel.Height = 13
              EditLabel.Caption = #32852#31995#30005#35805#65306
              LabelPosition = lpLeft
              LabelSpacing = 3
              TabOrder = 7
            end
            object Edit13: TLabeledEdit
              Left = 81
              Top = 180
              Width = 150
              Height = 21
              EditLabel.Width = 65
              EditLabel.Height = 13
              EditLabel.Caption = #37038#25919#32534#30721#65306
              LabelPosition = lpLeft
              LabelSpacing = 3
              TabOrder = 8
            end
            object Edit8: TMaskEdit
              Left = 81
              Top = 90
              Width = 149
              Height = 21
              EditMask = '!9999/99/00;1;_'
              MaxLength = 10
              TabOrder = 9
              Text = '    -  -  '
            end
            object Edit9: TComboBox
              Left = 335
              Top = 91
              Width = 150
              Height = 21
              Color = clSkyBlue
              ItemHeight = 13
              TabOrder = 10
            end
            object Edit15: TMaskEdit
              Left = 81
              Top = 210
              Width = 149
              Height = 21
              EditMask = '!9999/99/00;1;_'
              MaxLength = 10
              TabOrder = 11
              Text = '    -  -  '
            end
            object Edit16: TComboBox
              Left = 335
              Top = 210
              Width = 150
              Height = 21
              Color = clSkyBlue
              ItemHeight = 13
              TabOrder = 12
            end
            object Edit17: TComboBox
              Left = 81
              Top = 241
              Width = 150
              Height = 21
              Color = clSkyBlue
              ItemHeight = 13
              TabOrder = 13
              Items.Strings = (
                #22312
                #19981#22312)
            end
            object DateTimePicker1: TDateTimePicker
              Left = 212
              Top = 91
              Width = 19
              Height = 21
              CalAlignment = dtaLeft
              Date = 37894.4361795718
              Time = 37894.4361795718
              DateFormat = dfShort
              DateMode = dmComboBox
              Kind = dtkDate
              ParseInput = False
              TabOrder = 14
              OnChange = DateTimePicker1Change
            end
            object DateTimePicker2: TDateTimePicker
              Left = 212
              Top = 211
              Width = 19
              Height = 21
              CalAlignment = dtaLeft
              Date = 37894.4361795718
              Time = 37894.4361795718
              DateFormat = dfShort
              DateMode = dmComboBox
              Kind = dtkDate
              ParseInput = False
              TabOrder = 15
              OnChange = DateTimePicker2Change
            end
            object Edit_employee_ID: TEdit
              Left = 272
              Top = 240
              Width = 121
              Height = 21
              TabOrder = 16
              Visible = False
            end
            object Panel6: TPanel
              Left = 503
              Top = 0
              Width = 154
              Height = 267
              Align = alRight
              Caption = #21452#20987#28155#21152#22270#29255'(jpg'#26684#24335')'
              Color = clSkyBlue
              Font.Charset = ANSI_CHARSET
              Font.Color = clFuchsia
              Font.Height = -12
              Font.Name = #23435#20307