groupright.dfm

来自「产品信息系统!关于产品基础信息的系统!功能强大!」· DFM 代码 · 共 689 行 · 第 1/2 页

inherited frmGroupRight: TfrmGroupRight
  Left = 231
  Top = 100
  Width = 719
  Height = 509
  BorderIcons = [biMinimize, biMaximize]
  Caption = #29992#25143#32452#26435#38480#35774#32622
  OldCreateOrder = True
  OnCloseQuery = FormCloseQuery
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  PixelsPerInch = 96
  TextHeight = 13
  object Splitter2: TSplitter
    Left = 185
    Top = 38
    Width = 5
    Height = 444
  end
  object ToolBar: TToolBar
    Left = 0
    Top = 0
    Width = 711
    Height = 38
    AutoSize = True
    ButtonHeight = 36
    ButtonWidth = 33
    Caption = 'ToolBar'
    Flat = True
    Images = frmMain.ilToolButtonImages1
    ShowCaptions = True
    TabOrder = 0
    object tbtFirst: TToolButton
      Left = 0
      Top = 0
      Action = acFirst
    end
    object tbtPrior: TToolButton
      Left = 33
      Top = 0
      Action = acPrior
    end
    object tbtNext: TToolButton
      Left = 66
      Top = 0
      Action = acNext
    end
    object tbtLast: TToolButton
      Left = 99
      Top = 0
      Action = acLast
    end
    object ToolButton5: TToolButton
      Left = 132
      Top = 0
      Width = 8
      Caption = 'ToolButton5'
      ImageIndex = 21
      Style = tbsDivider
    end
    object ToolButton1: TToolButton
      Left = 140
      Top = 0
      Action = acAllCheck
    end
    object ToolButton2: TToolButton
      Left = 173
      Top = 0
      Action = acAllUnCheck
    end
    object ToolButton3: TToolButton
      Left = 206
      Top = 0
      Width = 11
      Caption = 'ToolButton3'
      ImageIndex = 0
      Style = tbsDivider
    end
    object tbtSave: TToolButton
      Left = 217
      Top = 0
      Action = acSave
    end
    object tbtCancel: TToolButton
      Left = 250
      Top = 0
      Action = acCancel
    end
    object tbtDivider3: TToolButton
      Left = 283
      Top = 0
      Width = 8
      Caption = 'tbtDivider3'
      ImageIndex = 12
      Style = tbsDivider
    end
    object tbtExit: TToolButton
      Left = 291
      Top = 0
      Action = acExit
    end
  end
  object Panel1: TPanel
    Left = 0
    Top = 38
    Width = 185
    Height = 444
    Align = alLeft
    TabOrder = 1
    object Splitter1: TSplitter
      Left = 1
      Top = 217
      Width = 183
      Height = 10
      Cursor = crVSplit
      Align = alBottom
    end
    object Panel2: TPanel
      Left = 1
      Top = 1
      Width = 183
      Height = 216
      Align = alClient
      TabOrder = 0
      object wwDBGrid1: TwwDBGrid
        Left = 1
        Top = 1
        Width = 181
        Height = 214
        Selected.Strings = (
          'fName'#9'20'#9#32452#21517#9#9)
        IniAttributes.Delimiter = ';;'
        TitleColor = clBtnFace
        FixedCols = 0
        ShowHorzScrollBar = True
        Align = alClient
        DataSource = dsMaster
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = #23435#20307
        Font.Style = [fsBold]
        Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit, dgWordWrap]
        ParentFont = False
        ReadOnly = True
        TabOrder = 0
        TitleAlignment = taLeftJustify
        TitleFont.Charset = GB2312_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -13
        TitleFont.Name = #23435#20307
        TitleFont.Style = [fsBold]
        TitleLines = 1
        TitleButtons = False
      end
    end
    object Panel3: TPanel
      Left = 1
      Top = 227
      Width = 183
      Height = 216
      Align = alBottom
      TabOrder = 1
      object wwDBGrid2: TwwDBGrid
        Left = 1
        Top = 1
        Width = 181
        Height = 214
        Selected.Strings = (
          'fName'#9'20'#9#23376#31995#32479#9#9)
        IniAttributes.Delimiter = ';;'
        TitleColor = clBtnFace
        FixedCols = 0
        ShowHorzScrollBar = True
        Align = alClient
        DataSource = dsModule
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = #23435#20307
        Font.Style = [fsBold]
        Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit, dgWordWrap]
        ParentFont = False
        ReadOnly = True
        TabOrder = 0
        TitleAlignment = taLeftJustify
        TitleFont.Charset = GB2312_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -13
        TitleFont.Name = #23435#20307
        TitleFont.Style = [fsBold]
        TitleLines = 1
        TitleButtons = False
      end
    end
  end
  object Panel4: TPanel
    Left = 190
    Top = 38
    Width = 521
    Height = 444
    Align = alClient
    TabOrder = 2
    object DBGrid1: TDBGrid
      Left = 1
      Top = 1
      Width = 519
      Height = 442
      Align = alClient
      DataSource = dsMDFunction
      Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit]
      TabOrder = 0
      TitleFont.Charset = GB2312_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -13
      TitleFont.Name = #23435#20307
      TitleFont.Style = []
      OnDblClick = DBGrid1DblClick
      Columns = <
        item
          Expanded = False
          FieldName = 'fName'
          Title.Alignment = taCenter
          Title.Font.Charset = GB2312_CHARSET
          Title.Font.Color = clWindowText
          Title.Font.Height = -13
          Title.Font.Name = #23435#20307
          Title.Font.Style = [fsBold]
          Width = 174
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'fRun'
          Title.Alignment = taCenter
          Title.Font.Charset = GB2312_CHARSET
          Title.Font.Color = clWindowText
          Title.Font.Height = -13
          Title.Font.Name = #23435#20307
          Title.Font.Style = [fsBold]
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'fInsert'
          Title.Alignment = taCenter
          Title.Font.Charset = GB2312_CHARSET
          Title.Font.Color = clWindowText
          Title.Font.Height = -13
          Title.Font.Name = #23435#20307
          Title.Font.Style = [fsBold]
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'fEdit'
          Title.Alignment = taCenter
          Title.Font.Charset = GB2312_CHARSET
          Title.Font.Color = clWindowText
          Title.Font.Height = -13
          Title.Font.Name = #23435#20307
          Title.Font.Style = [fsBold]
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'fDelete'
          Title.Alignment = taCenter
          Title.Font.Charset = GB2312_CHARSET
          Title.Font.Color = clWindowText
          Title.Font.Height = -13
          Title.Font.Name = #23435#20307
          Title.Font.Style = [fsBold]
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'fConfirm'
          Title.Alignment = taCenter
          Title.Font.Charset = GB2312_CHARSET
          Title.Font.Color = clWindowText
          Title.Font.Height = -13
          Title.Font.Name = #23435#20307
          Title.Font.Style = [fsBold]
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'fCancel'
          Title.Alignment = taCenter
          Title.Font.Charset = GB2312_CHARSET
          Title.Font.Color = clWindowText
          Title.Font.Height = -13
          Title.Font.Name = #23435#20307
          Title.Font.Style = [fsBold]
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'fFind'
          Title.Alignment = taCenter
          Title.Font.Charset = GB2312_CHARSET
          Title.Font.Color = clWindowText
          Title.Font.Height = -13
          Title.Font.Name = #23435#20307
          Title.Font.Style = [fsBold]
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'fFilter'
          Title.Alignment = taCenter
          Title.Font.Charset = GB2312_CHARSET
          Title.Font.Color = clWindowText
          Title.Font.Height = -13
          Title.Font.Name = #23435#20307
          Title.Font.Style = [fsBold]
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'fPrint'
          Title.Alignment = taCenter
          Title.Font.Charset = GB2312_CHARSET
          Title.Font.Color = clWindowText
          Title.Font.Height = -13
          Title.Font.Name = #23435#20307
          Title.Font.Style = [fsBold]
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'fExport'
          Title.Alignment = taCenter
          Title.Font.Charset = GB2312_CHARSET
          Title.Font.Color = clWindowText
          Title.Font.Height = -13
          Title.Font.Name = #23435#20307
          Title.Font.Style = [fsBold]
          Visible = True
        end>
    end
  end
  object ALToolbar: TActionList
    Left = 496