杭州交通信息网徐州环城国家森林公园:delphi中怎么在一个Demo中显示几个数据库的信息
来源：百度文库 编辑：杭州交通信息网 时间：2024/05/06 00:51:38
三个数据表存放在sql server 2000服务器中,数据库为ABC,三个表分别为a(医院名,经度,纬度),b(维修站名,经度,纬度),c(加油站名,经度,纬度).注表名后的括号内为表的字段.
在程序界面上一画一个Memo,三个按钮
当点击第一个按钮(显示医院)时要在Memo显示第一个表里的所有医院名,
当点击第二个按钮(显示维修站)时要在Memo显示第二个表里的所有维修站名,
当点击第三个.....
注:小弟不知道是用Memo组件还是用DBMemo组件,呵呵,反正是一个框框和三个按钮,当每按一个按钮时能把相关表中的一个字段全显示在框框中
问题:请告诉我要实现上述在一个框中每按一个按钮时分别显示不同表中的信息应该怎么做(希望能写详细些,如用到哪些组件等,按按钮时的代码)
谢谢!
在程序界面上一画一个Memo,三个按钮
当点击第一个按钮(显示医院)时要在Memo显示第一个表里的所有医院名,
当点击第二个按钮(显示维修站)时要在Memo显示第二个表里的所有维修站名,
当点击第三个.....
注:小弟不知道是用Memo组件还是用DBMemo组件,呵呵,反正是一个框框和三个按钮,当每按一个按钮时能把相关表中的一个字段全显示在框框中
问题:请告诉我要实现上述在一个框中每按一个按钮时分别显示不同表中的信息应该怎么做(希望能写详细些,如用到哪些组件等,按按钮时的代码)
谢谢!
如果显示数据表中得信息最好用DbGrid组件
添加一个DataSource组件(DataSource1)和一个Query组件(Query1)
设置DbGrid1得DataSource属性为:DataSource1
设置DataSource得DataSet属性为:Query1
然后点第一按钮时:
With Query1 do begin
Close;
SQL.Clear;
SQL.Add('Select * From a');
Open;
end;
点第二按钮时:
With Query1 do begin
Close;
SQL.Clear;
SQL.Add('Select * From b');
Open;
end;
dia点第三个按钮时:
With Query1 do begin
Close;
SQL.Clear;
SQL.Add('Select * From C');
Open;
end;