u_count.dfm

一个地方税务征收管理系统

object count: Tcount
  Left = 45
  Top = 40
  Width = 744
  Height = 451
  Caption = 'count'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 31
    Top = 22
    Width = 36
    Height = 13
    Caption = #26102#38388#65306
  end
  object Label2: TLabel
    Left = 164
    Top = 22
    Width = 12
    Height = 13
    Caption = #21040
  end
  object DateTimePicker1: TDateTimePicker
    Left = 72
    Top = 18
    Width = 81
    Height = 21
    Date = 37793.519015601850000000
    Time = 37793.519015601850000000
    TabOrder = 0
  end
  object DateTimePicker2: TDateTimePicker
    Left = 184
    Top = 18
    Width = 81
    Height = 21
    Date = 37793.519015601850000000
    Time = 37793.519015601850000000
    TabOrder = 1
  end
  object CheckBox1: TCheckBox
    Left = 288
    Top = 24
    Width = 49
    Height = 17
    Caption = #25353#31038
    TabOrder = 2
  end
  object BitBtn1: TBitBtn
    Left = 384
    Top = 16
    Width = 75
    Height = 25
    Caption = #26597#35810
    TabOrder = 3
  end
  object DBGridEh1: TDBGridEh
    Left = 8
    Top = 64
    Width = 697
    Height = 329
    DataSource = D_rc
    FooterColor = clWindow
    FooterFont.Charset = DEFAULT_CHARSET
    FooterFont.Color = clWindowText
    FooterFont.Height = -11
    FooterFont.Name = 'MS Sans Serif'
    FooterFont.Style = []
    TabOrder = 4
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    UseMultiTitle = True
    Columns = <
      item
        EditButtons = <>
        FieldName = 'she'
        Footers = <>
        Title.Caption = #31038
      end
      item
        EditButtons = <>
        FieldName = 'r_s1'
        Footers = <>
        Title.Caption = #20892#19994#31246'|'#20219#21153
        Width = 70
      end
      item
        EditButtons = <>
        FieldName = 's1'
        Footers = <>
        Title.Caption = #20892#19994#31246'|'#24050#20132
        Width = 70
      end
      item
        EditButtons = <>
        FieldName = 'x_s1'
        Footers = <>
        Title.Caption = #20892#19994#31246'|'#19979#24046
        Width = 70
      end
      item
        EditButtons = <>
        FieldName = 'r_s2'
        Footers = <>
        Title.Caption = #20004#24037'|'#20219#21153
        Width = 70
      end
      item
        EditButtons = <>
        FieldName = 's2'
        Footers = <>
        Title.Caption = #20004#24037'|'#24050#20132
        Width = 70
      end
      item
        EditButtons = <>
        FieldName = 'x_s2'
        Footers = <>
        Title.Caption = #20004#24037'|'#19979#24046
        Width = 70
      end
      item
        EditButtons = <>
        FieldName = 'r_count'
        Footers = <>
        Title.Caption = #23567#35745'|'#20219#21153
        Width = 70
      end
      item
        EditButtons = <>
        FieldName = 'mcount'
        Footers = <>
        Title.Caption = #23567#35745'|'#24050#20132
        Width = 70
      end
      item
        EditButtons = <>
        FieldName = 'x_count'
        Footers = <>
        Title.Caption = #23567#35745'|'#19979#24046
        Width = 70
      end>
  end
  object ADOConnection1: TADOConnection
    Connected = True
    ConnectionString = 
      'Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security In' +
      'fo=False;Initial Catalog=cw'
    LoginPrompt = False
    Provider = 'SQLOLEDB.1'
    Left = 224
    Top = 120
  end
  object A_RC: TADOQuery
    Active = True
    Connection = ADOConnection1
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'SELECT * FROM V_posent')
    Left = 136
    Top = 120
  end
  object D_rc: TDataSource
    DataSet = A_RC
    Left = 192
    Top = 120
  end
end