facelaneclass_unt.dfm

来自「煤矿行业采掘接替计划自动生成系统」· DFM 代码 · 共 61 行

inherited FaceLaneClass_Frm: TFaceLaneClass_Frm
  VertScrollBar.Range = 0
  Align = alClient
  BorderIcons = []
  BorderStyle = bsNone
  Caption = #22238#37319#38754#21644#24055#36947#31867#20449#24687
  OldCreateOrder = True
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  inherited Panel1: TPanel
    Top = 312
    Height = 36
    Align = alBottom
    object BitBtn1: TBitBtn
      Tag = 11
      Left = 136
      Top = 8
      Width = 75
      Height = 25
      Caption = #30830#23450
      TabOrder = 0
    end
    object BitBtn2: TBitBtn
      Tag = 11
      Left = 360
      Top = 8
      Width = 75
      Height = 25
      Caption = #20851#38381
      TabOrder = 1
      OnClick = BitBtn2Click
    end
  end
  inherited Panel2: TPanel
    Top = 0
    Height = 312
    object PageControl1: TPageControl
      Left = 1
      Top = 1
      Width = 534
      Height = 310
      ActivePage = FaceClass_Sheet
      Align = alClient
      TabIndex = 0
      TabOrder = 0
      object FaceClass_Sheet: TTabSheet
        Caption = #22238#37319#38754#31867
        OnResize = FaceClass_SheetResize
        OnShow = FaceClass_SheetShow
      end
      object LaneClass_Sheet: TTabSheet
        Caption = #24055#36947#31867
        ImageIndex = 1
        OnShow = LaneClass_SheetShow
      end
    end
  end
end