摘要:
//存数据procedure TForm1.Button1Click(Sender: TObject);var mm: TMemoryStream;begin mm := TMemoryStream.Create; image1.Picture.Graphic.SaveToStream(mm); sqlQuery1.SQL.Clear; SQLQuery1.SQL.Add('insert into datasnap_test (id, des, img) values (2, :des, :img)'); SQLquery1.ParamByName('des') 阅读全文