fx_unit.dfm

仿速达进销存系统,系统在单据打印上作了灵活的自定义.可供借鉴

object fx_form: Tfx_form
  Left = 19
  Top = 96
  Width = 745
  Height = 479
  BorderIcons = [biSystemMenu, biMaximize]
  Caption = #20998#26512
  Color = 13031127
  Ctl3D = False
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clBlue
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 12
  object PageControl1: TPageControl
    Left = 0
    Top = 0
    Width = 737
    Height = 452
    ActivePage = TabSheet1
    Align = alClient
    TabIndex = 0
    TabOrder = 0
    object TabSheet1: TTabSheet
      Caption = #20998#26512
      object GroupBox1: TGroupBox
        Left = 0
        Top = 0
        Width = 729
        Height = 26
        Align = alTop
        TabOrder = 0
        DesignSize = (
          729
          26)
        object RadioButton1: TRadioButton
          Left = 16
          Top = 7
          Width = 46
          Height = 17
          Caption = #36827#36135
          Ctl3D = True
          ParentCtl3D = False
          TabOrder = 0
          OnClick = RadioButton1Click
        end
        object RadioButton2: TRadioButton
          Left = 137
          Top = 7
          Width = 73
          Height = 17
          Caption = #36827#36135#36864#36135
          TabOrder = 1
          OnClick = RadioButton2Click
        end
        object RadioButton3: TRadioButton
          Left = 258
          Top = 8
          Width = 49
          Height = 12
          Caption = #38144#21806
          TabOrder = 2
          OnClick = RadioButton3Click
        end
        object RadioButton4: TRadioButton
          Left = 379
          Top = 7
          Width = 73
          Height = 17
          Caption = #23458#25143#36864#36135
          TabOrder = 3
          OnClick = RadioButton4Click
        end
        object RadioButton5: TRadioButton
          Left = 540
          Top = 8
          Width = 49
          Height = 12
          Anchors = []
          Caption = #24211#23384
          Ctl3D = False
          ParentCtl3D = False
          TabOrder = 4
          OnClick = RadioButton5Click
        end
      end
      object GroupBox2: TGroupBox
        Left = 0
        Top = 26
        Width = 729
        Height = 41
        Align = alTop
        TabOrder = 1
        object Label2: TLabel
          Left = 446
          Top = 15
          Width = 12
          Height = 12
          Caption = #21040
        end
        object Label9: TLabel
          Left = 17
          Top = 17
          Width = 48
          Height = 12
          Caption = #26174#31034#26631#31614
        end
        object Label10: TLabel
          Left = 157
          Top = 17
          Width = 48
          Height = 12
          Caption = #26174#31034#25968#25454
        end
        object SpeedButton6: TSpeedButton
          Left = 648
          Top = 10
          Width = 72
          Height = 23
          Caption = #20851#38381
          Flat = True
          OnClick = SpeedButton6Click
        end
        object SpeedButton1: TSpeedButton
          Left = 568
          Top = 10
          Width = 72
          Height = 24
          Caption = #22270#24418#20998#26512
          Flat = True
          OnClick = SpeedButton1Click
        end
        object DateTimePicker1: TDateTimePicker
          Left = 354
          Top = 12
          Width = 90
          Height = 18
          CalAlignment = dtaLeft
          Date = 37588.470305787
          Time = 37588.470305787
          DateFormat = dfShort
          DateMode = dmComboBox
          Kind = dtkDate
          ParseInput = False
          TabOrder = 0
        end
        object DateTimePicker2: TDateTimePicker
          Left = 459
          Top = 12
          Width = 90
          Height = 18
          CalAlignment = dtaLeft
          Date = 37588.4742040509
          Time = 37588.4742040509
          DateFormat = dfShort
          DateMode = dmComboBox
          Kind = dtkDate
          ParseInput = False
          TabOrder = 1
        end
        object ComboBox1: TComboBox
          Left = 64
          Top = 13
          Width = 90
          Height = 18
          BevelKind = bkFlat
          Style = csOwnerDrawFixed
          ItemHeight = 12
          TabOrder = 2
        end
        object ComboBox2: TComboBox
          Left = 205
          Top = 12
          Width = 90
          Height = 18
          BevelKind = bkFlat
          Style = csOwnerDrawFixed
          ItemHeight = 12
          TabOrder = 3
        end
        object CheckBox1: TCheckBox
          Left = 299
          Top = 14
          Width = 57
          Height = 17
          Caption = #26102#38388#27573
          TabOrder = 4
        end
      end
      object Chart1: TChart
        Left = 0
        Top = 67
        Width = 729
        Height = 358
        BackWall.Brush.Color = clWhite
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clBlue
        Title.Font.Height = -13
        Title.Font.Name = #23435#20307
        Title.Font.Style = []
        Title.Text.Strings = (
          #20998#26512#22270
          '')
        View3D = False
        View3DOptions.Elevation = 315
        View3DOptions.Orthogonal = False
        View3DOptions.Perspective = 0
        View3DOptions.Rotation = 360
        Align = alClient
        TabOrder = 2
        object Edit6: TEdit
          Left = 368
          Top = 8
          Width = 33
          Height = 18
          TabOrder = 0
          Visible = False
        end
        object Edit7: TEdit
          Left = 408
          Top = 8
          Width = 25
          Height = 18
          TabOrder = 1
          Visible = False
        end
        object Series1: TBarSeries
          Marks.ArrowLength = 20
          Marks.Style = smsLabelPercentTotal
          Marks.Visible = True
          SeriesColor = clRed
          Title = #20998#26512#26609#24418#22270
          BarBrush.Color = clWhite
          BarPen.Color = clBlue
          BarWidthPercent = 25
          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 Edit4: TEdit
        Left = 32
        Top = 80
        Width = 33
        Height = 18
        TabOrder = 3
        Visible = False
      end
      object Edit5: TEdit
        Left = 80
        Top = 80
        Width = 33
        Height = 18
        TabOrder = 4
        Visible = False
      end
    end
    object TabSheet5: TTabSheet
      Caption = #27611#21033#28070#20998#26512
      ImageIndex = 4
      object GroupBox9: TGroupBox
        Left = 0
        Top = 0
        Width = 729
        Height = 41
        Align = alTop
        TabOrder = 0
        object Label13: TLabel
          Left = 222
          Top = 15
          Width = 12
          Height = 12
          Caption = #21040
        end
        object SpeedButton5: TSpeedButton
          Left = 568
          Top = 10
          Width = 72
          Height = 23
          Caption = #30830#23450
          Flat = True
          OnClick = SpeedButton5Click
        end
        object SpeedButton10: TSpeedButton
          Left = 648
          Top = 10
          Width = 72
          Height = 23
          Caption = #20851#38381
          Flat = True
          OnClick = SpeedButton10Click
        end
        object Label1: TLabel
          Left = 8
          Top = 16
          Width = 60
          Height = 12
          Caption = #27719#24635#26102#38388#27573
        end
        object DateTimePicker9: TDateTimePicker
          Left = 66
          Top = 12
          Width = 140
          Height = 18
          CalAlignment = dtaLeft
          Date = 37588.470305787
          Time = 37588.470305787
          DateFormat = dfShort
          DateMode = dmComboBox
          Kind = dtkDate
          ParseInput = False
          TabOrder = 0
        end
        object DateTimePicker10: TDateTimePicker
          Left = 251
          Top = 12
          Width = 140
          Height = 18
          CalAlignment = dtaLeft
          Date = 37588.4742040509
          Time = 37588.4742040509
          DateFormat = dfShort
          DateMode = dmComboBox
          Kind = dtkDate
          ParseInput = False
          TabOrder = 1
        end
      end
      object GroupBox10: TGroupBox
        Left = 0
        Top = 41
        Width = 729
        Height = 66
        Align = alTop
        TabOrder = 1
        object Edit1: TEdit
          Left = 84
          Top = 13
          Width = 120
          Height = 18
          Ctl3D = False
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlue
          Font.Height = -12
          Font.Name = #23435#20307
          Font.Style = []
          ParentCtl3D = False
          ParentFont = False
          ReadOnly = True
          TabOrder = 0
          Text = '0'
        end
        object Edit2: TEdit
          Left = 346
          Top = 13
          Width = 120
          Height = 18
          Ctl3D = False
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlue
          Font.Height = -12
          Font.Name = #23435#20307
          Font.Style = []
          ParentCtl3D = False
          ParentFont = False
          ReadOnly = True
          TabOrder = 1
          Text = '0'
        end
        object CheckBox2: TCheckBox
          Left = 17
          Top = 40
          Width = 67
          Height = 20
          Caption = #38144#21806#37329#39069
          TabOrder = 2
          OnClick = CheckBox2Click
        end
        object CheckBox3: TCheckBox
          Left = 17
          Top = 16
          Width = 67
          Height = 15
          Caption = #36827#36135#37329#39069
          TabOrder = 3
          OnClick = CheckBox3Click
        end
        object CheckBox4: TCheckBox
          Left = 250
          Top = 14
          Width = 91
          Height = 17
          Caption = #36827#36135#36864#36135#37329#39069
          TabOrder = 4
          OnClick = CheckBox4Click
        end
        object CheckBox5: TCheckBox
          Left = 250
          Top = 40
          Width = 97
          Height = 17
          Caption = #23458#25143#36864#36135#37329#39069
          TabOrder = 5
          OnClick = CheckBox5Click
        end
        object CheckBox6: TCheckBox
          Left = 512
          Top = 16
          Width = 65
          Height = 17
          Caption = #20854#23427#36153#29992
          TabOrder = 6
          OnClick = CheckBox6Click
        end
        object Edit8: TEdit
          Left = 84
          Top = 40
          Width = 120
          Height = 18
          Ctl3D = False
          ParentCtl3D = False
          TabOrder = 7
          Text = '0'
        end
        object Edit9: TEdit
          Left = 346
          Top = 40
          Width = 120
          Height = 18
          Ctl3D = False
          ParentCtl3D = False
          TabOrder = 8
          Text = '0'
        end
        object Edit10: TEdit
          Left = 584
          Top = 40
          Width = 120
          Height = 18
          Ctl3D = False
          ParentCtl3D = False
          ReadOnly = True
          TabOrder = 9
        end
        object Edit3: TEdit
          Left = 584
          Top = 13
          Width = 120
          Height = 18
          Ctl3D = False
          MaxLength = 8
          ParentCtl3D = False
          TabOrder = 10
        end
        object CheckBox7: TCheckBox
          Left = 512
          Top = 40
          Width = 57
          Height = 17
          Caption = #27611#21033#28070
          TabOrder = 11
          OnClick = CheckBox7Click
        end
      end
      object Chart2: TChart
        Left = 0
        Top = 107
        Width = 729
        Height = 318
        BackWall.Brush.Color = clWhite
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clBlue
        Title.Font.Height = -13
        Title.Font.Name = #23435#20307
        Title.Font.Style = []
        Title.Text.Strings = (
          #20998#26512#22270
          '')
        View3D = False
        View3DOptions.Elevation = 315
        View3DOptions.Orthogonal = False
        View3DOptions.Perspective = 0
        View3DOptions.Rotation = 360
        Align = alClient
        TabOrder = 2
        object Edit11: TEdit
          Left = 368
          Top = 8
          Width = 33
          Height = 18
          TabOrder = 0
          Visible = False
        end
        object Edit12: TEdit
          Left = 408
          Top = 8
          Width = 25
          Height = 18
          TabOrder = 1
          Visible = False
        end
        object BarSeries1: TBarSeries
          Marks.ArrowLength = 20
          Marks.Style = smsLabelPercentTotal
          Marks.Visible = True
          SeriesColor = clRed
          Title = #20998#26512#26609#24418#22270
          BarBrush.Color = clWhite
          BarPen.Color = clBlue
          BarWidthPercent = 25
          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
    end
  end
end