使用TQUERY:
delsql:='delete * from t where TypeID='+inttostr(delt);
With DataModule3.ADOQuery1 Do
Begin
Close;
SQl.Clear;
SQl.add(delsql);
ExecSQL;
End;
delsql:='delete * from t where TypeID='+inttostr(delt);
With DataModule3.ADOQuery1 Do
Begin
Close;
SQl.Clear;
SQl.add(delsql);
ExecSQL;
End;
Query1.sql.clear;
Query1.sql.text:=format('select * from TBUser where UserId=''%s''',['Admin']);
Query1.open;
先指定query1.databasename;
然后 query1.close;
query1.sql.clear;
query1.sql.add('select * from table1 order by name');
query1.open;
//这是个小例子。
adoquery1.sql.clear;
adoquery1.sql.add();
adoqyery1.execsql;
begin
close;
sql.clear;
sql.add('select * from customer');
open;
end;
begin
close();
sql.clear();
sql.add(strSQL);
prepare();
open();
end;
with query1 do
begin
close;
sql.clear;
sql.add('你的sql语句');
open(检索)/execsql(更新)
end;
query1.sql.clear;
query1.sql.add('select * from tablename where 字段=:param');
query1.parambyname('param').asstring := edit1.text;
query1.open;