procedure TForm1.BitBtn1Click(Sender: TObject); var s: string; begin with ADOQuery1 do begin close; sql.Text := 'insrt into BlobTable (ext) values('':kao'')'; Parameters.ParamByName('kao').Value:='pei'; execsql; end; end;
with ADOQuery1 do begin close; sql.Text := 'insrt into BlobTable (ext) values(:kao)'; Parameters.ParamByName('kao').Value:='pei'; execsql;
----------------------------------------------
http://www.yhsee.com----------奕华软件