文件名称：Delphi 使用复合查询一次查询多个数据表.rar
文件大小：9KB
文件格式：RAR
更新时间：2022-07-30 12:44:02
Delphi源码-数据库实例
Delphi 复合查询数据库的例子，一次查询三个表，主要是这句SQL实现复合查询：select distinct 学生.姓名,班级.班级,班级.班主任,教师.年龄 as 教师年龄 from 学生,教师,班级 where 学生.班级=班级.班级 and 班级.班主任=教师.姓名，在很多Delphi数据库系统中，都有用到SQL复合查询的需求。下面是具体代码： table1.DatabaseName:=dir1 '\data'; table2.DatabaseName:=table1.DatabaseName; table3.DatabaseName:=table1.DatabaseName; query1.DatabaseName:=table1.DatabaseName; table1.TableName:='学生.db'; table2.TableName:='教师.db'; table3.TableName:='班级.db'; table1.Open; table2.Open; table3.Open; except showmessage('数据库读取错误！！'); end; end; procedure TForm1.Button1Click(Sender: TObject); begin with query1 do begin close; sql.Clear; sql.Add('select distinct 学生.姓名,班级.班级,班级.班主任,教师.年龄 as 教师年龄 from 学生,教师,班级 where 学生.班级=班级.班级 and 班级.班主任=教师.姓名'); open; end; end;
【文件预览】：
srcfans.com
----Delphi 复合查询实例()
--------Project1.res(876B)
--------data()
--------Unit1.dfm(4KB)
--------Unit1.ddp(51B)
--------Project1.cfg(434B)
--------Unit1.pas(2KB)
--------Project1.dpr(188B)
--------Project1.dof(2KB)
--------Unit1.dcu(6KB)