dephi 綁定變量

//作高效數據庫程序比較有用
var
  S:string;
begin
  S:='select dept_name from department where dept_id=:id';
  DM.qry.Close;
  DM.qry.SQL.Clear;
  DM.qry.SQL.Add(S);
  DM.qry.Prepared:=true;
  DM.qry.ParamByName('id').Value:=1;//使用的是ODAC,ADO同樣可以執行
  DM.qry.Open;
  edit1.Text:=DM.qry.FieldByName('dept_name').AsString;
end;