就10分了， 再问大力

[guanjueweimiao]

SQL.Clear ;
SQL.Add ('select * from 学生库.学生表 where xingming=:xingming and xingbie=:xingbie and xuehao=:xuehao and banji=:banji');
Parameters.ParamByName ('xingming').Value := xingming.Text ;
Parameters.ParamByName ('xingbie').Value := xingbie.Text ;
Parameters.ParamByName ('xuehao').Value :=StrToInt(xuehao.Text) ;
Parameters.ParamByName ('banji').Value :=StrToInt(banji.Text) ;
ExecSQL ;
这是上次你指点修改的，运行正常，我想将这一查询结果显示在DBGRID中，需要怎样设置一下，其中窗本中已有DBGRID且DATASOURCE也已设置，各字段也已设好，但不能显示，是不是上面的代码还要写点什么？

[pengdali]

SQL.Clear ;
SQL.Add ('select * from 学生库.学生表 where xingming=:xingming and xingbie=:xingbie and xuehao=:xuehao and banji=:banji');
Parameters.ParamByName ('xingming').Value := xingming.Text ;
Parameters.ParamByName ('xingbie').Value := xingbie.Text ;
Parameters.ParamByName ('xuehao').Value :=StrToInt(xuehao.Text) ;
Parameters.ParamByName ('banji').Value :=StrToInt(banji.Text) ;
open; //不是execsql