cptration_pictplan.dfm

来自「一个以前收集的基于C/S架构的ERP客户端源代码」· DFM 代码 · 共 412 行

inherited frmCptRation_PictPlan: TfrmCptRation_PictPlan
  Left = 2
  Top = 103
  Width = 793
  Height = 573
  BiDiMode = bdRightToLeft
  Caption = '工作中心负荷计划图'
  Icon.Data = {
    0000010001001010000000000000680500001600000028000000100000002000
    000001000800000000004001000000000000000000000001000000000000FFFF
    FF00FF690000FCF9F900F7EFF000F0E2E300EFE0E100EEDEDF00EEDDDE00EBD7
    D900E9D3D500E2C6C800DDBCBF00DDBBBE00DBB8BB00DAB6B900D6ADB100D2A6
    AA00D1A5A900CFA1A500C68F9400C58C9100BF818600BD7D8300BD7C8200B873
    7900B46A7000B2666D00AF616800AE5F6600AC5B6200AB596000A64F5700A44C
    5400A1464E00A1454D009D3D450098343D0096303900962F3800952D36008C1C
    26008B1A24008A1822008A17210089151F0088131D00850E1800850D17008106
    11008105100080040F0080030E007F020D00FF870C00FF004700FF0000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    000000000000000000000000000000363636360000163636361F0C0000000036
    363636001B363636363636130000000000000000000000000000000000000036
    3636360000002736363636362000003636363600000000363636363636000000
    00000000000000000000000000000036363636000A3636000036363622000036
    3636360021363624030036360F00000000000000000000000000000000000036
    36363600363636363618000000000036363636001C3636363636140000000000
    0000000000000000000000000000003636363600001536363636362300000036
    363636000000122436361A000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    000000000000000000000000000000000000000000000000000000000000}
  OldCreateOrder = True
  ParentBiDiMode = False
  PixelsPerInch = 96
  TextHeight = 12
  inherited sbBar: TStatusBar
    Top = 505
    Width = 785
  end
  inherited CoolBar1: TCoolBar
    Width = 785
    Bands = <
      item
        Control = tbMainBar
        ImageIndex = -1
        MinHeight = 35
        Visible = False
        Width = 785
      end>
    Visible = False
    inherited tbMainBar: TToolBar
      Width = 772
      Visible = False
    end
  end
  object Chart1: TChart [2]
    Left = 0
    Top = 89
    Width = 785
    Height = 416
    AnimatedZoomSteps = 10
    BackWall.Brush.Color = clWhite
    BackWall.Brush.Style = bsClear
    Gradient.EndColor = 16711808
    Title.Color = clWhite
    Title.Font.Charset = DEFAULT_CHARSET
    Title.Font.Color = clBlue
    Title.Font.Height = -13
    Title.Font.Name = 'Arial'
    Title.Font.Style = []
    Title.Text.Strings = (
      '工作中心负荷计划图')
    Chart3DPercent = 5
    DepthAxis.ExactDateTime = False
    LeftAxis.Automatic = False
    LeftAxis.AutomaticMaximum = False
    LeftAxis.AutomaticMinimum = False
    LeftAxis.Axis.Width = 1
    LeftAxis.ExactDateTime = False
    LeftAxis.Grid.Style = psDashDotDot
    LeftAxis.Grid.SmallDots = True
    LeftAxis.Increment = 50
    LeftAxis.LabelsAngle = 90
    LeftAxis.LabelsSeparation = 60
    LeftAxis.LabelsSize = 22
    LeftAxis.Maximum = 300
    LeftAxis.MinorTickCount = 5
    LeftAxis.MinorTickLength = 4
    LeftAxis.StartPosition = 3
    LeftAxis.TickLength = 6
    Legend.Alignment = laBottom
    Legend.ColorWidth = 100
    Legend.HorizMargin = 24
    Legend.ShadowSize = 0
    Legend.TopPos = 0
    Legend.VertMargin = 1
    TopAxis.Title.Caption = '工作中心'
    View3DOptions.Elevation = 296
    View3DOptions.HorizOffset = 14
    View3DOptions.Perspective = 0
    View3DOptions.Zoom = 103
    OnGetNextAxisLabel = Chart1GetNextAxisLabel
    Align = alClient
    BevelInner = bvLowered
    BevelOuter = bvLowered
    BevelWidth = 0
    Color = clBtnHighlight
    TabOrder = 2
    object Series1: TBarSeries
      Marks.ArrowLength = 20
      Marks.Style = smsValue
      Marks.Visible = True
      SeriesColor = clRed
      Title = '负荷'
      BarWidthPercent = 55
      OffsetPercent = 50
      XValues.DateTime = False
      XValues.Name = 'X'
      XValues.Multiplier = 1
      XValues.Order = loAscending
      YValues.DateTime = False
      YValues.Name = 'Bar'
      YValues.Multiplier = 1
      YValues.Order = loNone
    end
    object Series2: TBarSeries
      Marks.ArrowLength = 20
      Marks.Style = smsValue
      Marks.Visible = True
      SeriesColor = clGreen
      Title = '能力'
      BarWidthPercent = 35
      OffsetPercent = -5
      XValues.DateTime = False
      XValues.Name = 'X'
      XValues.Multiplier = 1
      XValues.Order = loAscending
      YValues.DateTime = False
      YValues.Name = 'Bar'
      YValues.Multiplier = 1
      YValues.Order = loNone
    end
  end
  object Panel1: TPanel [3]
    Left = 0
    Top = 39
    Width = 785
    Height = 50
    Align = alTop
    TabOrder = 3
    object Label2: TLabel
      Left = 266
      Top = 28
      Width = 12
      Height = 12
      Caption = '--'
    end
    object Label3: TLabel
      Left = 131
      Top = 27
      Width = 48
      Height = 12
      Caption = '日期从：'
    end
    object Label4: TLabel
      Left = 120
      Top = 7
      Width = 60
      Height = 12
      Caption = '工作中心：'
    end
    object GroupBox1: TGroupBox
      Left = 560
      Top = -6
      Width = 225
      Height = 56
      Color = clScrollBar
      ParentColor = False
      TabOrder = 0
      object PageControl1: TPageControl
        Left = 1
        Top = 4
        Width = 224
        Height = 52
        ActivePage = TabSheet1
        TabOrder = 0
        object TabSheet1: TTabSheet
          Caption = '属性(A)'
          object RadioGroup1: TRadioGroup
            Left = 9
            Top = -13
            Width = 120
            Height = 45
            ItemIndex = 1
            Items.Strings = (
              'Default'
              'User defined')
            TabOrder = 0
            OnClick = RadioGroup1Click
          end
        end
        object TabSheet2: TTabSheet
          Caption = '属性(B)'
          ImageIndex = 1
          object Label1: TLabel
            Left = 0
            Top = 8
            Width = 36
            Height = 12
            Caption = 'Zoom：'
          end
          object BitBtn3: TBitBtn
            Left = 122
            Top = 1
            Width = 48
            Height = 22
            Caption = 'ZOUT'
            TabOrder = 0
            OnClick = BitBtn3Click
            Glyph.Data = {
              42010000424D4201000000000000760000002800000011000000110000000100
              040000000000CC00000000000000000000001000000010000000000000000000
              BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
              FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DDDDDDDDDDDD
              DDDDD0000000D00DDDDDDDDDDDDDD0000000D000DDDDDDDDDDDDD0000000DD00
              0DDDDDDDDDDDD0000000DDD000D800008DDDD0000000DDDD0000777700DDD000
              0000DDDDD08EE777780DD0000000DDDD807E77777708D0000000DDDD07E77777
              7770D0000000DDDD077000000770D0000000DDDD077000000E70D0000000DDDD
              077777777E70D0000000DDDD80777777EE08D0000000DDDDD08777EEE80DD000
              0000DDDDDD00777700DDD0000000DDDDDDD800008DDDD0000000DDDDDDDDDDDD
              DDDDD0000000}
          end
          object BitBtn4: TBitBtn
            Left = 170
            Top = 1
            Width = 46
            Height = 22
            Caption = 'ZIN'
            TabOrder = 1
            OnClick = BitBtn4Click
            Glyph.Data = {
              42010000424D4201000000000000760000002800000011000000110000000100
              040000000000CC00000000000000000000001000000010000000000000000000
              BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
              FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DDDDDDDDDDDD
              DDDDD0000000D00DDDDDDDDDDDDDD0000000D000DDDDDDDDDDDDD0000000DD00
              0DDDDDDDDDDDD0000000DDD000D800008DDDD0000000DDDD0000777700DDD000
              0000DDDDD08EE777780DD0000000DDDD807E70077708D0000000DDDD07E77007
              7770D0000000DDDD077000000770D0000000DDDD077000000E70D0000000DDDD
              077770077E70D0000000DDDD80777007EE08D0000000DDDDD08777EEE80DD000
              0000DDDDDD00777700DDD0000000DDDDDDD800008DDDD0000000DDDDDDDDDDDD
              DDDDD0000000}
          end
          object ScrollBar1: TScrollBar
            Left = 35
            Top = 6
            Width = 79
            Height = 16
            Max = 300
            Min = 50
            PageSize = 0
            Position = 50
            TabOrder = 2
            OnChange = ScrollBar1Change
          end
        end
        object TabSheet3: TTabSheet
          Caption = '属性(C)'
          ImageIndex = 2
          object cb_Logarithmic: TCheckBox
            Left = 1
            Top = 4
            Width = 97
            Height = 17
            Caption = 'Logarithmic'
            TabOrder = 0
            OnClick = cb_LogarithmicClick
          end
        end
      end
    end
    object GroupBox2: TGroupBox
      Left = 0
      Top = -6
      Width = 105
      Height = 56
      TabOrder = 1
      object CheckBox2: TCheckBox
        Left = 8
        Top = 16
        Width = 95
        Height = 17
        Caption = '按百分比显示'
        TabOrder = 0
        OnClick = tbQueryClick
      end
    end
    object de_DateF: TDateEdit
      Left = 179
      Top = 24
      Width = 86
      Height = 20
      LineOffset = 2
      LineColor = clGreen
      LineVisible = False
      CDate = '2003-05-14'
      InitDate = '2003-05-14'
      ModalResult = 0
      TabOrder = 2
      Color = -2113929211
    end
    object de_DateE: TDateEdit
      Left = 279
      Top = 24
      Width = 86
      Height = 20
      LineOffset = 2
      LineColor = clGreen
      LineVisible = False
      CDate = '2003-05-14'
      InitDate = '2003-05-14'
      ModalResult = 0
      TabOrder = 3
      Color = -2113929211
    end
    object se_wc: TSDEdit
      Left = 180
      Top = 3
      Width = 185
      Height = 20
      Color = clHighlightText
      TabOrder = 4
      OnButtonClick = se_wcButtonClick
      ButtonVisible = True
      SplitSymbol = ' | '
    end
    object BitBtn1: TBitBtn
      Left = 416
      Top = 16
      Width = 66
      Height = 23
      Caption = '显示[&Q]'
      TabOrder = 5
      OnClick = tbQueryClick
    end
    object BitBtn2: TBitBtn
      Left = 483
      Top = 16
      Width = 66
      Height = 23
      Cancel = True
      Caption = '打印[&P]'
      TabOrder = 6
      OnClick = muPrintClick
    end
  end
  inherited MainMenu1: TMainMenu
    BiDiMode = bdRightToLeft
    ParentBiDiMode = False
    Left = 562
    inherited muFile: TMenuItem
      Visible = False
    end
  end
  inherited ImageList1: TImageList
    Left = 503
  end
  inherited QueryPrnDlg: TPrintDialog
    Left = 382
  end
  inherited PrnSetupDlg: TPrinterSetupDialog
    Left = 441
  end
  inherited pmDetail: TPopupMenu
    ParentBiDiMode = False
    Left = 534
  end
  inherited puQueryGrid: TPopupMenu
    ParentBiDiMode = False
    Left = 472
  end
  inherited ExportSaveDlg: TSaveDialog
    Left = 609
    Top = 5
  end
  inherited AdvReport: TAdvReport
    Left = 655
    Top = 65533
  end
end