unit1.dfm

一个DEPHI设备保养系统全套,不错的设计参考

object frmmaintable: Tfrmmaintable
  Left = 67
  Top = 117
  Width = 800
  Height = 540
  Caption = #20027#25968#25454#34920
  Color = clMoneyGreen
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  FormStyle = fsMDIChild
  Icon.Data = {
    0000010001002020100000000000E80200001600000028000000200000004000
    0000010004000000000000020000000000000000000000000000000000000000
    0000000080000080000000808000800000008000800080800000C0C0C0008080
    80000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF000000
    8000000000000000000000080000000008222222222222222222228000000000
    0222222222222222222222200000000002222222222222222222222000000000
    022000000000000000000220000000000220FFFFFFFFFFFFFFFF022000000000
    0220FFFFFFFFFFFFFFFF0220000000000220FFFFFFFFFFFFFFFF022000000000
    0220FF000F0000000FFF0220000000000220FFFFFFFFFFFFFFFF022000000000
    0220FF000F000000FFFF0220000000000220FFFFFFFFFFFFFFFF022000000000
    0220FF000F0000FFFFFF0220000000000220FFFFFFFFFFFFFFFF022000000000
    0220FF000F00000000FF0220000000000220FFFFFFFFFFFFFFFF022000000000
    0220FF000F0000FFFFFF0220000000000220FFFFFFFFFFFFFFFF022000000000
    0220FF000F0000000FFF0220000000000220FFFFFFFFFFFFFFFF022000000000
    0220FF000F00000FFFFF0220000000000220FFFFFFFFFFFFFFFF022000000000
    0220FFFFFFFFFFFFFFFF0220000000000220F00000000000000F022000000000
    0220F0BBBBBBBBBBBB0F022000000000022000BBBBBBBBBBBB00022000000000
    0822220BBBBBBBBBB022228000000000800000000BBBBBB00000000800000000
    0000000000B00B0000000000000000000000000000B00B000000000000000000
    0000000000BBBB0000000000000000000000000000000000000000000000F000
    000FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF000
    000FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF000
    000FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF000
    000FF000000FF000000FF000000FFFF81FFFFFF81FFFFFF81FFFFFFC3FFF}
  OldCreateOrder = False
  Position = poOwnerFormCenter
  Visible = True
  OnActivate = FormActivate
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Label3: TLabel
    Left = 292
    Top = 44
    Width = 212
    Height = 19
    Caption = 'E'#20445#20859#31649#29702#31995#32479'-'#20027#25968#25454#34920
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -19
    Font.Name = #21326#25991#34892#26999
    Font.Style = [fsUnderline]
    ParentFont = False
  end
  object Shape1: TShape
    Left = 2
    Top = 33
    Width = 790
    Height = 3
  end
  object ToolBar1: TToolBar
    Left = 0
    Top = 0
    Width = 792
    Height = 33
    ButtonHeight = 28
    ButtonWidth = 30
    Caption = 'ToolBar1'
    Flat = True
    Images = ImageList1
    TabOrder = 0
    object tblfirst: TToolButton
      Left = 0
      Top = 0
      Hint = #36339#21040#26368#21069#19968#26465#20449#24687
      Caption = 'tblfirst'
      ImageIndex = 0
      ParentShowHint = False
      ShowHint = True
      OnClick = tblfirstClick
    end
    object tblpri: TToolButton
      Left = 30
      Top = 0
      Hint = #19978#19968#26465#20449#24687
      Caption = 'tblpri'
      ImageIndex = 1
      ParentShowHint = False
      ShowHint = True
      OnClick = tblpriClick
    end
    object tblnext: TToolButton
      Left = 60
      Top = 0
      Hint = #19979#19968#26465#20449#24687
      Caption = 'tb'
      ImageIndex = 2
      ParentShowHint = False
      ShowHint = True
      OnClick = tblnextClick
    end
    object tbllast: TToolButton
      Left = 90
      Top = 0
      Hint = #36339#21040#26368#21518#19968#26465#20449#24687
      Caption = 'tbllast'
      ImageIndex = 3
      ParentShowHint = False
      ShowHint = True
      OnClick = tbllastClick
    end
    object ToolButton2: TToolButton
      Left = 120
      Top = 0
      Width = 8
      Caption = 'ToolButton2'
      ImageIndex = 5
      Style = tbsSeparator
    end
    object tbladd: TToolButton
      Left = 128
      Top = 0
      Hint = #28155#21152
      Caption = 'tbladd'
      Enabled = False
      ImageIndex = 5
      ParentShowHint = False
      ShowHint = True
      OnClick = tbladdClick
    end
    object tbldel: TToolButton
      Left = 158
      Top = 0
      Hint = #21024#38500
      Caption = 'tbldel'
      Enabled = False
      ImageIndex = 6
      ParentShowHint = False
      ShowHint = True
      OnClick = tbldelClick
    end
    object tbledt: TToolButton
      Left = 188
      Top = 0
      Hint = #32534#36753
      Caption = 'tbledt'
      Enabled = False
      ImageIndex = 7
      ParentShowHint = False
      ShowHint = True
      OnClick = tbledtClick
    end
    object tblok: TToolButton
      Left = 218
      Top = 0
      Hint = #30830#35748#26356#25913
      Caption = 'tblok'
      Enabled = False
      ImageIndex = 8
      ParentShowHint = False
      ShowHint = True
      OnClick = tblokClick
    end
    object tblcancel: TToolButton
      Left = 248
      Top = 0
      Hint = #25764#28040#26356#25913
      Caption = 'tblcancel'
      Enabled = False
      ImageIndex = 9
      ParentShowHint = False
      ShowHint = True
      OnClick = tblcancelClick
    end
    object tblref: TToolButton
      Left = 278
      Top = 0
      Hint = #25968#25454#21047#26032
      Caption = 'tblref'
      Enabled = False
      ImageIndex = 10
      ParentShowHint = False
      ShowHint = True
      OnClick = tblrefClick
    end
    object ToolButton1: TToolButton
      Left = 308
      Top = 0
      Width = 8
      Caption = 'ToolButton1'
      ImageIndex = 11
      Style = tbsSeparator
    end
    object tblprint: TToolButton
      Left = 316
      Top = 0
      Hint = #25253#34920#25171#21360
      Caption = 'tblprint'
      ImageIndex = 12
      ParentShowHint = False
      ShowHint = True
      OnClick = tblprintClick
    end
    object tblclose: TToolButton
      Left = 346
      Top = 0
      Hint = #20851#38381#31383#21475
      Caption = 'tblclose'
      ImageIndex = 13
      ParentShowHint = False
      ShowHint = True
      OnClick = tblcloseClick
    end
  end
  object Panel1: TPanel
    Left = 384
    Top = 2
    Width = 401
    Height = 28
    BevelOuter = bvNone
    Color = clMoneyGreen
    Ctl3D = False
    ParentCtl3D = False
    TabOrder = 1
    object Label1: TLabel
      Left = 108
      Top = 6
      Width = 39
      Height = 16
      Caption = #21306#22495#65306
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Label2: TLabel
      Left = 213
      Top = 6
      Width = 39
      Height = 16
      Caption = #31867#21035#65306
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText