fillvalue.dfm

一个大型的机房管理系统,可以用在学校的实验室管理,网吧管理也行,功能丰富.

inherited FillValueForm: TFillValueForm
  Left = 229
  Top = 181
  Caption = #21345#21495#20805#20540
  ClientHeight = 245
  ClientWidth = 335
  OnClose = FormClose
  PixelsPerInch = 96
  TextHeight = 12
  inherited palUp: TPanel
    Width = 335
    inherited palRightUp: TPanel
      Left = 240
    end
    inherited palUpMid: TPanel
      Width = 160
      inherited imgCaption: TImage
        Width = 160
      end
      inherited CoolBarMenu: TCoolBar
        Width = 160
        Bands = <
          item
            Control = ToolBarMenu
            ImageIndex = -1
            MinHeight = 23
            Width = 160
          end>
        inherited ToolBarMenu: TToolBar
          Width = 156
        end
      end
    end
  end
  inherited palDown: TPanel
    Top = 236
    Width = 335
    inherited imgRightDown: TImage
      Left = 325
    end
    inherited imgDownMin: TImage
      Width = 315
    end
  end
  inherited palLeft: TPanel
    Height = 186
    inherited imgLeft: TImage
      Height = 186
    end
  end
  inherited palRight: TPanel
    Left = 320
    Height = 186
    inherited imgRight: TImage
      Height = 186
    end
  end
  inherited palClient: TPanel
    Width = 310
    Height = 186
    inherited lbBtnOK: TLabelBtn
      Left = 192
      Top = 160
      OnClick = MIBtnOKClick
    end
    inherited lbBtnExit: TLabelBtn
      Left = 264
      Top = 160
      OnClick = imgCloseButtonClick
    end
    inherited MIBtnOK: TMoveImgBtn
      Left = 160
      Top = 152
      OnClick = MIBtnOKClick
    end
    inherited MIBtnExit: TMoveImgBtn
      Left = 232
      Top = 152
      OnClick = imgCloseButtonClick
    end
    object lbCarNo: TLabel
      Left = 24
      Top = 20
      Width = 48
      Height = 12
      Caption = #20805#20540#21345#21495
    end
    object lbFillNum: TLabel
      Left = 24
      Top = 52
      Width = 48
      Height = 12
      Caption = #20805#20540#25968#37327
    end
    object edtCarNo: TEdit
      Left = 80
      Top = 16
      Width = 209
      Height = 20
      MaxLength = 8
      TabOrder = 0
      OnKeyPress = edtCarNoKeyPress
    end
    object edtFillNum: TEdit
      Left = 80
      Top = 48
      Width = 209
      Height = 20
      TabOrder = 1
      OnKeyPress = edtCarNoKeyPress
    end
    object rgFillType: TRadioGroup
      Left = 24
      Top = 80
      Width = 265
      Height = 57
      Caption = #20805#20540#26041#24335
      Columns = 2
      ItemIndex = 0
      Items.Strings = (
        #25353#37329#39069#20805#20540#65288#20803#65289
        #25353#26426#26102#20805#20540#65288#20998#38047#65289)
      TabOrder = 2
    end
  end
end