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