都都进来这里
拖一个TADOConnection组件,设置ConnectionString属性以连接你的成绩数据库,再放一个TADOQuery组件,设置Connection属性为上面的TADOConnection组件,再设置SQL属性为你的查询SQL语句即可.最后再放上一个TDataSource设置DataSet为TADOQuery,和一个TDBGird,设置DataSource为上面的TDataSource,最后将TADOQuery的Active属性设置为True
但是等我设置为Ture的时候总是提示我 "11"附近有错误
我的 SQL语句是这样写的
use 11 select jjj from TABLE1
问题点数:50、回复次数:5Top
1 楼icd(骆驼)回复于 2002-05-19 14:50:08 得分 5
把use ll去掉
只写 select jjj from TABLE1 就可以了Top
2 楼macro_love(光光)回复于 2002-05-19 14:51:07 得分 5
不用uses ll
而直接用select jjj from TABLE1Top
3 楼lxpbuaa(桂枝香在故国晚秋)回复于 2002-05-19 14:51:15 得分 5
use 11 select jjj from TABLE1 不对
改为
select jjj from TABLE1
—————————————————————————————————
MaximStr := '宠辱不惊,看庭前花开花落,去留无意;
毁誉由人,望天上云卷云舒,聚散任风。';
if Not Assigned(I) then
I := TI.Create(Nil);
I.Maxim := MaximStr;
—————————————————————————————————
Top
4 楼crystal_bobo(宝贝晶晶亮)回复于 2002-05-19 15:03:30 得分 0
非常感谢各位
在回答一下马上就给分大家好吗
1)如何做报表与数据库连呢?
2)如果我把这个界面做成查询的界面
帮忙教教一些控件的使用和定义属性几连接好马?Top
5 楼CodeDuDu(都都)回复于 2002-05-20 09:32:08 得分 35
条件查询:
先在昨天设计的窗体上方一个TEdit控件和TButton控件,比如我们是要按姓名查找,就是在Edit1中输入姓名,然后按Button1后,就在DBGird1中显示你输入的姓名的学生成绩。
在Button1的OnClick()事件中输入:
ADOQuery1.Close;
ADOQuery1.SQL.Add('Select * From Student WHERE Name=:N')
ADOQuery1.Parameters.ParamByName('N').Value :=Edit1.Text;
ADOQuery1.Open;
搞定。
关于报表:
添加一个新窗体,让新窗体Use上面的Unit1,放一个TQuickRep控件,设置QuickRep1的DataSet属性为Form1.ADOQuery1。放TQRBand控件,BandType属性为rbDetail。在QRBand1中放入数个TQRDBText控件设置DataSet属性为Form1.ADOQuery1,和DataField属性为你的表的各个字段。
然后,回到Form1,在Form1中Use Unit2,添加TButton控件,Caption为“打印预览”,OnClick()中输入:
Form2.QuickRep1.Preview;
搞定!!!!!!!!!!!!!!Top




