当前位置: 开源爱好者 » Delphi源码 » UI界面 » 详情页

Delphi 从多个表中合并数据

  • 时间:2018-04-12
  • 测试环境:Delphi7+
  • 源码概述:合并数据

Delphi 从多个表中合并数据,运行此程序之前,需要附加数据库。
  procedure TForm1.BitBtn1Click(Sender: TObject);
  begin
   with ADOQuery1 do
   begin
   Close;
   SQL.Clear;
   SQL.Add('select b.学生编号,b.学生姓名,b.家庭住址,');
   SQL.Add('a.高数,a.外语,a.计算机文化基础,a.数据库管理,a.数据结构,a.软件工程');
   SQL.Add('From tb_Mark a,tb_Stu b');
   SQL.Add('where a.学生编号=b.学生编号');
   Open;
   end;
   dbgrid1.Fields[2].DisplayWidth := 15;
  end;

Delphi 从多个表中合并数据测试效果图
源码包大小:176K
该源码已累计下载了:

CopyRight 2018© 开源爱好者 All Rights Reserved 豫ICP备16030607号 隐私声明 网站地图