delphi中SQL动态参数查询
代码 1 procedure TForm1.StartClick(Sender: TObject);
2 begin
3 Query1.Close;
4 Query1.SQL.Clear;
5 Query1.SQL.Add('SELECT 学号');
6 Query1.SQL.Add('FROM classmates');
7 Query1.SQL.Add('WHERE 年龄<:number');
8 Query1.Params[0].AsString:=Edit1.Text;
9
10 Query1.Prepare;
11 Query1.Open;
12 end;
13
14 end.
2 begin
3 Query1.Close;
4 Query1.SQL.Clear;
5 Query1.SQL.Add('SELECT 学号');
6 Query1.SQL.Add('FROM classmates');
7 Query1.SQL.Add('WHERE 年龄<:number');
8 Query1.Params[0].AsString:=Edit1.Text;
9
10 Query1.Prepare;
11 Query1.Open;
12 end;
13
14 end.
DBGrid-->DataSource-->Query
Query中设置数据库文件(可在控件上点右键设置)
注:
在动态SQL语句中,常用到prepare,delphi会将带参数的SQL语句传送给其对应的数据库引擎,对SQL语句进行语法分析和优化

浙公网安备 33010602011771号