with F_ingredview1.adoquery1 do begin close; SQL.add('delete * from ÈÕÁ¸Ð޸ıí where formula=:formula1'); Parameters.Items[0].Value:=Edit50.Text; Prepared:=True ExecSQL; end;
´íÎóÌáʾ£ºfrom×Ó¾äÓï·¨´íÎó¡£'delete from ÈÕÁ¸Ð޸ıí where formula=:formula1' delete ºóÃæ²»ÒªÓÐ* 'delete from ÈÕÁ¸Ð޸ıí where formula=:formula1' ÔÎ,»¹ÊÇÂýÁËÒ»ÏÂ
........................ Õâ¸öÊÇϰ¹ßµÄÊÖÎó
ɾ³ýÁË»¹ÊÇÒ»ÑùµÄ´íÎóÌáʾ¡£Ôõô°ì°¡ with F_ingredview1.adoquery1 do begin close; SQL.clear; SQL.add('delete from ÈÕÁ¸Ð޸ıí where formula='''+Edit50.Text+'''');
procedure DynArrayDelete(var A;elSize:Longint;index,Count:Integer); var len,MaxDelete:Integer; P:PLongint; //4 ¸ö×ֽڵij¤ÕûÐÎÖ¸Õë begin P:=PLongint(A);// È¡µÄ A µÄ ......