detailzp.~dfm

全面剖析财务管理的内容

inherited fmDetailZB: TfmDetailZB
  Caption = #26126#32454#36134#26597#35810
  OldCreateOrder = True
  PixelsPerInch = 96
  TextHeight = 13
  inherited Panel2: TPanel [0]
    Left = 0
    Width = 683
    Height = 38
    Align = alTop
    object Label4: TLabel
      Left = 30
      Top = 12
      Width = 26
      Height = 13
      Caption = #31185#30446
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
  end
  inherited ToolBar1: TToolBar [1]
    inherited btNew: TToolButton
      Enabled = False
    end
    inherited btEdit: TToolButton
      Enabled = False
    end
    inherited btDelete: TToolButton
      Enabled = False
    end
    inherited btSave: TToolButton
      Enabled = False
    end
    inherited btCancel: TToolButton
      Enabled = False
    end
  end
  inherited CoolBar1: TCoolBar [2]
  end
  inherited DBGrid1: TDBGrid [3]
    Top = 113
    Width = 683
    Height = 311
    Align = alClient
    Columns = <
      item
        Expanded = False
        FieldName = #20973#35777#32534#21495
        Width = 57
        Visible = True
      end
      item
        Expanded = False
        FieldName = #20250#35745#26399#38388
        Width = 65
        Visible = True
      end
      item
        Expanded = False
        FieldName = #25688#35201
        Width = 72
        Visible = True
      end
      item
        Expanded = False
        FieldName = #20511#26041
        Visible = True
      end
      item
        Expanded = False
        FieldName = #36151#26041
        Visible = True
      end
      item
        Expanded = False
        FieldName = #20313#39069
        Visible = True
      end
      item
        Expanded = False
        FieldName = #20313#39069#26041#21521
        Visible = True
      end>
  end
  inherited Table1: TTable
    Active = True
    IndexFieldNames = #31185#30446#20195#30721
    MasterFields = #31185#30446#20195#30721
    MasterSource = DataSource2
    ReadOnly = True
    TableName = 'dbo.'#26412#26399#26126#32454#36134#31807
  end
  object Table2: TTable
    Active = True
    DatabaseName = 'db'
    TableName = 'dbo.'#31185#30446#34920
    Left = 616
    Top = 80
  end
  object DataSource2: TDataSource
    AutoEdit = False
    DataSet = Query1
    Left = 544
    Top = 8
  end
  object Query1: TQuery
    Active = True
    AfterScroll = Query1AfterScroll
    DatabaseName = 'db'
    SQL.Strings = (
      'select distinct a.'#31185#30446#20195#30721',b.'#31185#30446#21517#31216' from '#26412#26399#26126#32454#36134#31807' as a,'
      '    '#31185#30446#34920' as b where a.'#31185#30446#20195#30721'=b.'#31185#30446#20195#30721' order by a.'#31185#30446#20195#30721)
    Left = 512
    Top = 8
  end
end