gl_qry_accountbook5.dfm

来自「一个MRPII系统源代码版本」· DFM 代码 · 共 52 行

inherited Frm_Gl_Qry_AccountBook5: TFrm_Gl_Qry_AccountBook5
  Left = 180
  Top = 178
  Caption = '多栏式明细帐'
  PixelsPerInch = 96
  TextHeight = 12
  inherited Pnl_Title: TPanel
    Caption = '多栏式明细帐'
  end
  inherited Pnl_Head: TPanel
    inherited Lbl_OrderTitle: TLabel
      Top = 22
    end
    inherited Lbl_Order: TLabel
      Top = 22
      Width = 24
      Caption = '日期'
    end
  end
  inherited Pnl_Body: TPanel
    inherited DBGridEh: TDBGridEh
      UseMultiTitle = True
    end
  end
  inherited ActionList: TActionList
    Left = 208
    Top = 208
  end
  inherited AdoQry_Main: TAdoQuery
    ConnectionString = 
      'Provider=SQLOLEDB.1;Password=mdrcmrm;Persist Security Info=True;' +
      'User ID=mdrcmrm;Initial Catalog=mdysjmrm;Data Source=192.168.0.1' +
      '51;Use procedure for Prepare=1;Auto Translate=True;Packet Size=4' +
      '096;Workstation ID=XYB'
    SQL.Strings = (
      'select t1.kmCode,'
      '       t2.kmName,'
      '       sum(t1.debitAmount) as debitAmount,'
      '       sum(t1.creditAmount) as creditAmount'
      'from   Gl_Credenceline t1'
      'left join Gl_AccountSubject t2 on t1.kmCode=t2.kmCode'
      'group by t1.kmCode,t2.kmName')
    Left = 184
    Top = 257
  end
  object AdoQry_tmp1: TAdoQuery
    Parameters = <>
    Left = 192
    Top = 137
  end
end