querypd.dfm

晓风财务软件源码,具有财务软基本功能,仅供学习,勿商用,后果与本人无关 1、使用的第三方VCL: FastReport2.6中文版 EHLIB3 sncCurrency SUIPac

        Transparent = False
      end
      object ListAuditingPD: TsuiComboBox
        Left = 20
        Top = 393
        Width = 147
        Height = 20
        UIStyle = DeepBlue
        BorderColor = clBlack
        ArrowColor = clBlack
        ButtonColor = 15263976
        Style = csDropDownList
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ItemHeight = 12
        ParentFont = False
        TabOrder = 17
      end
      object btnGO: TsuiButton
        Left = 97
        Top = 424
        Width = 73
        Height = 25
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        Caption = #26597#35810
        AutoSize = False
        ParentFont = False
        UIStyle = BlueGlass
        TabOrder = 18
        Transparent = True
        ModalResult = 0
        Layout = blGlyphLeft
        Spacing = 4
        MouseContinuouslyDownInterval = 100
        OnClick = btnGOClick
        ResHandle = 0
      end
      object editSubject: TsuiEdit
        Left = 20
        Top = 219
        Width = 148
        Height = 17
        UIStyle = DeepBlue
        BorderColor = clBlack
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        ReadOnly = True
        TabOrder = 8
        OnKeyPress = editSubjectKeyPress
      end
      object editNum1: TsuiEdit
        Left = 20
        Top = 116
        Width = 65
        Height = 17
        UIStyle = DeepBlue
        BorderColor = clBlack
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 3
        Text = '0'
        OnKeyPress = editMoney1KeyPress
      end
      object editNum2: TsuiEdit
        Left = 102
        Top = 116
        Width = 65
        Height = 17
        UIStyle = DeepBlue
        BorderColor = clBlack
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 4
        Text = '0'
        OnKeyPress = editMoney1KeyPress
      end
      object ckNum: TsuiCheckBox
        Left = 19
        Top = 97
        Width = 69
        Height = 18
        UIStyle = BlueGlass
        ParentFont = False
        AutoSize = True
        Checked = False
        Caption = #20973#35777#21495#65306
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        TabOrder = 2
        TabStop = True
        State = cbUnchecked
        Transparent = False
      end
      object btnPrint: TsuiButton
        Left = 20
        Top = 424
        Width = 73
        Height = 25
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        Caption = #25171#21360
        AutoSize = False
        ParentFont = False
        UIStyle = BlueGlass
        Enabled = False
        TabOrder = 19
        Transparent = True
        ModalResult = 0
        Glyph.Data = {
          6E040000424D6E04000000000000360000002800000013000000120000000100
          1800000000003804000000000000000000000000000000000000E8E8E8E8E8E8
          E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8
          E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8000000E8E8E8E8E8E8E8E8E8E8
          E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8
          E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8000000E8E8E8E8E8E8E8E8E80400010000
          00000100000101000000000000020000020000010002020000000000E8E8E8E8
          E8E8E8E8E8E8E8E8E8E8E8000000E8E8E8E8E8E8000100BFBFBFBFC0BEC0C0C0
          C1BDC2C1BFBFBDBFBFBFC0BEBFBEC0BFC0BE000100C1BFBF020000E8E8E8E8E8
          E8E8E8E8E8E8E8000000E8E8E800020002000000000000000000000000010000
          0001010101020000020000000001000100000001BDBFBF020001E8E8E8E8E8E8
          E8E8E8000000E8E8E8000000C2C0C0BCBEBEC2C1BDC1BEC0BFBFBFBEC0C003FF
          FE00FFFE00FEFFC1BFBEBFBFBF020001000100000100E8E8E8E8E8E8E8E8E800
          0000E8E8E8020000C1BEC0BFBFBFBDBFC0BDBEC2BFBFBFBDC0BE7F7F7F817F7F
          7F7E80BFBFBFBFBFBF030002C0C1BF020000E8E8E8E8E8E8E8E8E8000000E8E8
          E800010000000000010002000002000000000000000300000100010000010000
          0001000101000000BCBFBDC0C0C0000000E8E8E8E8E8E8000000E8E8E8000000
          BFBEC0BDBFBFC3BEC0BFBEC0C1BFBFC0C0C0BFC0BEBFBFBFBFBEC0C1BFBF0001
          00C1BFBF010200BEBEBE020001E8E8E8E8E8E8000000E8E8E8E8E8E800000000
          0000000000000000000000000000010101000000000000000000BEBEBE000000
          BFBFBF000000000000E8E8E8E8E8E8000000E8E8E8E8E8E8E8E8E8000000FFFF
          FFFEFEFEFFFFFFFEFEFEFFFFFFFFFFFFFFFFFFFFFFFF000000BFBFBF000000BF
          BFBF000000E8E8E8E8E8E8000000E8E8E8E8E8E8E8E8E8E8E8E8000000FFFFFF
          010101010101000000000000000000FFFFFF000000010101000000000000E8E8
          E8E8E8E8E8E8E8000000E8E8E8E8E8E8E8E8E8E8E8E8000000FFFFFFFFFFFFFE
          FEFEFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000E8E8E8E8E8E8E8E8E8E8E8E8
          E8E8E8000000E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8000000FFFFFF0101010000
          00000000000000000000FFFFFF000000E8E8E8E8E8E8E8E8E8E8E8E8E8E8E800
          0000E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8000000FFFFFFFFFFFFFFFFFFFFFFFF
          FFFFFFFFFFFFFFFFFFFFFFFF000000E8E8E8E8E8E8E8E8E8E8E8E8000000E8E8
          E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E800000000000000000000000000000000
          0000010101000000010101E8E8E8E8E8E8E8E8E8E8E8E8000000E8E8E8E8E8E8
          E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8
          E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8000000E8E8E8E8E8E8E8E8E8E8
          E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8
          E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8000000}
        Layout = blGlyphLeft
        Spacing = 4
        MouseContinuouslyDownInterval = 100
        OnClick = btnPrintClick
        ResHandle = 0
      end
    end
    object Panel1: TPanel
      Left = 0
      Top = 32
      Width = 509
      Height = 464
      Align = alClient
      BevelOuter = bvNone
      Color = clWhite
      TabOrder = 2
      DesignSize = (
        509
        464)
      object g: TDBGridEh
        Left = 8
        Top = 0
        Width = 499
        Height = 458
        Anchors = [akLeft, akTop, akRight, akBottom]
        BorderStyle = bsNone
        Color = clWhite
        Ctl3D = False
        DataSource = DataSource1
        FixedColor = 15263976
        Flat = True
        Font.Charset = GB2312_CHARSET
        Font.Color = clBlack
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        FooterColor = clWindow
        FooterFont.Charset = GB2312_CHARSET
        FooterFont.Color = clWindowText
        FooterFont.Height = -12
        FooterFont.Name = #23435#20307
        FooterFont.Style = []
        FooterRowCount = 1
        Options = [dgTitles, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
        OptionsEh = [dghFixed3D, dghHighlightFocus, dghClearSelection]
        ParentCtl3D = False
        ParentFont = False
        ReadOnly = True
        TabOrder = 0
        TitleFont.Charset = GB2312_CHARSET
        TitleFont.Color = clMaroon
        TitleFont.Height = -12
        TitleFont.Name = #26999#20307'_GB2312'
        TitleFont.Style = []
        UseMultiTitle = True
        OnDrawColumnCell = gDrawColumnCell
        Columns = <
          item
            EditButtons = <>
            FieldName = 'Year'
            Footers = <>
            Title.Caption = #26399#38388'|'#24180
            Width = 29
          end
          item
            EditButtons = <>
            FieldName = 'Month'
            Footers = <>
            Title.Caption = #26399#38388'|'#26376
            Width = 21
          end
          item
            EditButtons = <>
            FieldName = 'Number'
            Footers = <>
            Title.Caption = #20973#35777#21495
            Width = 28
          end
          item
            EditButtons = <>
            FieldName = 'DateTime'
            Footers = <>
            Title.Caption = #26085#26399