fxstj.dfm.~31~

来自「delphi2007开发的汽车配件进销存系统.实用级的源码.」· ~31~ 代码 · 共 724 行 · 第 1/2 页

object frmxstj: Tfrmxstj
  Left = 0
  Top = 0
  Caption = #38144#21806#32479#35745
  ClientHeight = 479
  ClientWidth = 810
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Style = []
  OldCreateOrder = False
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object cxPageControl1: TcxPageControl
    AlignWithMargins = True
    Left = 3
    Top = 3
    Width = 804
    Height = 473
    ActivePage = cxTabSheet1
    Align = alClient
    ShowFrame = True
    TabOrder = 0
    ClientRectBottom = 472
    ClientRectLeft = 1
    ClientRectRight = 803
    ClientRectTop = 26
    object cxTabSheet1: TcxTabSheet
      Caption = #25253#34920
      ImageIndex = 0
      ExplicitLeft = -15
      DesignSize = (
        802
        446)
      object DBGridEh1: TDBGridEh
        Left = 3
        Top = 72
        Width = 796
        Height = 371
        Anchors = [akLeft, akTop, akRight, akBottom]
        Color = clWhite
        DataSource = DM.ds9
        EvenRowColor = clInactiveCaptionText
        FixedColor = clWhite
        Flat = False
        FooterColor = clWindow
        FooterFont.Charset = DEFAULT_CHARSET
        FooterFont.Color = clWindowText
        FooterFont.Height = -11
        FooterFont.Name = 'Tahoma'
        FooterFont.Style = []
        FooterRowCount = 1
        Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
        PopupMenu = PopupMenu1
        SumList.Active = True
        TabOrder = 0
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'Tahoma'
        TitleFont.Style = []
        Columns = <
          item
            EditButtons = <>
            FieldName = 'xsdh'
            Footer.FieldName = 'xsdh'
            Footer.ValueType = fvtCount
            Footers = <>
          end
          item
            EditButtons = <>
            FieldName = 'bm'
            Footers = <>
            Width = 100
          end
          item
            EditButtons = <>
            FieldName = 'pm'
            Footers = <>
            Width = 130
          end
          item
            EditButtons = <>
            FieldName = 'gg'
            Footers = <>
          end
          item
            EditButtons = <>
            FieldName = 'cd'
            Footers = <>
            Visible = False
            Width = 100
          end
          item
            EditButtons = <>
            FieldName = 'sl'
            Footer.FieldName = 'sl'
            Footer.ValueType = fvtSum
            Footers = <>
          end
          item
            EditButtons = <>
            FieldName = 'jj'
            Footers = <>
            Visible = False
          end
          item
            DisplayFormat = #65509'0.00'
            EditButtons = <>
            FieldName = 'dj'
            Footers = <>
          end
          item
            DisplayFormat = #65509'0.00'
            EditButtons = <>
            FieldName = 'je'
            Footer.DisplayFormat = #65509'0.00'
            Footer.FieldName = 'je'
            Footer.ValueType = fvtSum
            Footers = <>
          end
          item
            EditButtons = <>
            FieldName = 'rq'
            Footers = <>
          end>
      end
      object cxGroupBox1: TcxGroupBox
        Left = 3
        Top = 8
        TabOrder = 1
        Height = 51
        Width = 190
        object cxLabel1: TcxLabel
          Left = 8
          Top = 21
          Caption = #24403#21069#26085#26399':'
          Transparent = True
        end
        object cxDateEdit1: TcxDateEdit
          Left = 60
          Top = 19
          TabOrder = 1
          Width = 121
        end
      end
      object cxGroupBox2: TcxGroupBox
        Left = 199
        Top = 8
        Enabled = False
        TabOrder = 2
        Height = 51
        Width = 303
        object cxLabel2: TcxLabel
          Left = 10
          Top = 21
          Caption = #36215
          Transparent = True
        end
        object cxDateEdit2: TcxDateEdit
          Left = 30
          Top = 19
          TabOrder = 1
          Width = 120
        end
        object cxDateEdit3: TcxDateEdit
          Left = 174
          Top = 19
          TabOrder = 2
          Width = 126
        end
        object cxLabel3: TcxLabel
          Left = 156
          Top = 21
          Caption = #27490
          Transparent = True
        end
      end
      object cxRadioButton2: TcxRadioButton
        Left = 210
        Top = 6
        Width = 73
        Height = 17
        Caption = #21306#38388#25253#34920
        TabOrder = 3
        OnClick = cxRadioButton2Click
        Transparent = True
      end
      object cxRadioButton1: TcxRadioButton
        Left = 11
        Top = 7
        Width = 66
        Height = 17
        Caption = #26085#25253#34920
        Checked = True
        TabOrder = 4
        TabStop = True
        OnClick = cxRadioButton1Click
        Transparent = True
      end
      object Button1: TButton
        Left = 508
        Top = 36
        Width = 72
        Height = 23
        Caption = #32479#35745
        TabOrder = 5
        OnClick = Button1Click
      end
      object cxCheckBox1: TcxCheckBox
        Left = 508
        Top = 13
        Caption = #20998#31867#32479#35745
        TabOrder = 6
        Transparent = True
        Width = 73
      end
      object cxButton1: TcxButton
        Left = 587
        Top = 36
        Width = 72
        Height = 23
        Caption = #25171#21360
        TabOrder = 7
        OnClick = cxButton1Click
      end
    end
  end
  object PopupMenu1: TPopupMenu
    Left = 352
    Top = 320
    object N1: TMenuItem
      Caption = #21024#38500
      OnClick = N1Click
    end
  end
  object frxReport1: TfrxReport
    Version = '4.3'
    DotMatrixReport = False
    IniFile = '\Software\Fast Reports'
    PreviewOptions.Buttons = [pbPrint, pbLoad, pbSave, pbExport, pbZoom, pbFind, pbOutline, pbPageSetup, pbTools, pbEdit, pbNavigator, pbExportQuick]
    PreviewOptions.Zoom = 1.000000000000000000
    PrintOptions.Printer = #39044#35774
    PrintOptions.PrintOnSheet = 0
    ReportOptions.CreateDate = 39265.843007627300000000
    ReportOptions.LastChange = 39265.843007627300000000
    ScriptLanguage = 'PascalScript'
    ScriptText.Strings = (
      'begin'
      ''
      'end.')
    Left = 720
    Top = 32
    Datasets = <
      item
        DataSet = frxDBDataset1
        DataSetName = 'frxDBDataset1'
      end>
    Variables = <>
    Style = <
      item
        Name = 'Title'
        Color = clNone
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -16
        Font.Name = 'Arial'
        Font.Style = [fsBold]
      end
      item
        Name = 'Header'
        Color = clNone
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = 'Arial'
        Font.Style = [fsBold]
      end
      item
        Name = 'Group header'
        Color = clNone
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = 'Arial'
        Font.Style = []
        Frame.Typ = [ftBottom]
      end
      item
        Name = 'Data'
        Color = clNone
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = 'Arial'
        Font.Style = []
      end
      item
        Name = 'Group footer'
        Color = clNone
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = 'Arial'
        Font.Style = []
        Frame.Typ = [ftTop]
      end
      item
        Name = 'Header line'
        Color = clNone
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = 'Arial'
        Font.Style = []
        Frame.Typ = [ftBottom]
        Frame.Width = 2.000000000000000000
      end>
    object Data: TfrxDataPage
      Height = 1000.000000000000000000
      Width = 1000.000000000000000000
    end
    object Page1: TfrxReportPage
      PaperWidth = 210.000000000000000000
      PaperHeight = 297.000000000000000000
      PaperSize = 9
      LeftMargin = 10.000000000000000000
      RightMargin = 10.000000000000000000
      TopMargin = 10.000000000000000000
      BottomMargin = 10.000000000000000000
      object ReportTitle1: TfrxReportTitle
        Height = 56.692950000000000000
        Top = 18.897650000000000000
        Width = 718.110700000000000000
        object Memo1: TfrxMemoView
          Left = 117.165430000000000000
          Top = 3.338590000000000000
          Width = 487.559370000000000000
          Height = 34.015770000000000000
          DisplayFormat.DecimalSeparator = '.'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -27
          Font.Name = 'Arial'
          Font.Style = [fsBold]
          HAlign = haCenter
          Memo.UTF8 = (
            #38335#8364#37726#57790#31930#29825#8451#23012#29723#0)
          ParentFont = False
        end
        object Line1: TfrxLineView
          Left = 3.779530000000000000
          Top = 47.133889999999990000
          Width = 710.551640000000000000
          Frame.Style = fsDouble
          Frame.Typ = [ftTop]
        end
      end
      object PageHeader1: TfrxPageHeader