2,497
社区成员
发帖
与我相关
我的任务
分享
with FDM.qry3deleteclass do
begin
Close;
SQL.Clear;
SQL.Add('delete from classinfo where classname=:classname');
Parameters.ParamByName('classname').Value := Edit1.Text;
ExecSQL;
end;