documentstypef.dfm

来自「极具实用价值的文件管理系统」· DFM 代码 · 共 77 行

inherited fmDocumentsType: TfmDocumentsType
  Caption = 'Category'
  ClientHeight = 269
  ClientWidth = 449
  PixelsPerInch = 96
  TextHeight = 13
  inherited pnlTitle: TCycPanel
    Width = 449
  end
  inherited lblTitle: TCycLabel
    Width = 106
    Caption = 'Category maintenance'
  end
  inherited pnlFooter: TPanel
    Top = 222
    Width = 449
    TabOrder = 3
    inherited pnlFooterLine: TCycPanel
      Width = 449
    end
    inherited btnOK: TCycSpeedButton
      Left = 241
    end
    inherited btnCancel: TCycSpeedButton
      Left = 345
    end
  end
  object edtTypeCode: TCycLabeledDBEdit
    Left = 89
    Top = 62
    Width = 121
    Height = 21
    DataField = 'TypeCode'
    DataSource = dmMain.srcCategory
    TabOrder = 0
    EditLabel.Width = 70
    EditLabel.Height = 13
    EditLabel.Caption = 'Category Code'
    EditLabel.Transparent = True
    LabelPosition = lpLeft
    LabelSpacing = 5
  end
  object edtTypeName: TCycLabeledDBEdit
    Left = 89
    Top = 99
    Width = 345
    Height = 21
    DataField = 'TypeName'
    DataSource = dmMain.srcCategory
    TabOrder = 1
    EditLabel.Width = 73
    EditLabel.Height = 13
    EditLabel.Caption = 'Category Name'
    EditLabel.Transparent = True
    LabelPosition = lpLeft
    LabelSpacing = 5
  end
  object edtRemarks: TCycLabeledDBMemo
    Left = 89
    Top = 136
    Width = 345
    Height = 68
    Ctl3D = True
    DataField = 'Remarks'
    DataSource = dmMain.srcCategory
    ParentCtl3D = False
    ScrollBars = ssVertical
    TabOrder = 2
    EditLabel.Width = 42
    EditLabel.Height = 13
    EditLabel.Caption = 'Remarks'
    EditLabel.Transparent = True
    LabelPosition = lpLeft
    LabelSpacing = 5
  end
end