当用DBGrid分别显示多个Query提供的数据时,怎么样各个属性名自动转化为汉字

解决方案 »

  1.   

    把dbgrid.datasource.dataset各个字段的displayname 设为中文就好了
      

  2.   

    是这样的,我有三个按钮,每一个按钮被按下后就激活一次Query,而每个都不同,但是是用一个DBGrid来显示,如何动态的将各个属性名自动转化为汉字
      

  3.   

    给你一个自己写的用的程序,做个例子把
    procedure TAskfm.suiButton1Click(Sender: TObject);
    var
    time1,time2:Tdatetime;
    pzlx,pzh,zy1,dw1,jtdw1:string;
    flag:boolean;
    begin
      adoquery2.close;
      datasource1.dataset:=adoquery2;
      dbgrid1.datasource:=datasource1;
      if checkbox1.checked=true then flag:=true
      else flag:=false;
      pzlx:=trim(combobox1.text);
      pzh:=trim(edit1.text);
      zy1:=trim(edit2.text);
      dw1:=trim(combobox2.text);
      jtdw1:=trim(combobox3.text);
      time1:=datetimepicker1.date;
      time2:=datetimepicker2.date;  askq(time1,time2,pzlx,pzh,zy1,dw1,jtdw1,'yfpz',adoquery2,flag);
      askflag:=1;
      dbgrid1.Columns.Items[0].Title.caption:='序号';
      dbgrid1.Columns.Items[1].Title.caption:='日期';
      dbgrid1.Columns.Items[2].Title.caption:='凭证类型';
      dbgrid1.Columns.Items[3].Title.caption:='凭证号数';
      dbgrid1.Columns.Items[4].Title.caption:='摘 要';
      dbgrid1.Columns.Items[5].Title.caption:='借方金额';
      dbgrid1.Columns.Items[6].Title.caption:='贷方金额';
      dbgrid1.Columns.Items[7].Title.caption:='余额';
      dbgrid1.Columns.Items[8].Title.caption:= '总余额';
      dbgrid1.Columns.Items[9].Title.caption:='供应商名称';
      dbgrid1.Columns.Items[10].Title.caption:='公司内部单位';
      dbgrid1.Columns.Items[11].Title.caption:='备注';
      dbgrid1.Columns.Items[0].Width:=40;
      dbgrid1.Columns.Items[1].Width:=105;
      dbgrid1.Columns.Items[2].Width:=60;
      dbgrid1.Columns.Items[3].Width:=60;
      dbgrid1.Columns.Items[4].Width:=60;
      dbgrid1.Columns.Items[5].Width:=60;
      dbgrid1.Columns.Items[6].Width:=60;
      dbgrid1.Columns.Items[7].Width:=100;
      dbgrid1.Columns.Items[8].Width:=100;
      dbgrid1.Columns.Items[9].Width:=140;
      dbgrid1.Columns.Items[10].Width:=100;
      dbgrid1.Columns.Items[11].Width:=80;end;