ورود

View Full Version : خطا در ذخیره کردن عکس در db


majid2
سه شنبه 21 فروردین 1397, 14:36 عصر
با سلام.
من کد زیر را برای ذخیره کردن عکس در دیتایس Sql اجرا می کنم خطا میدهد لطفا راهنمایی کنید(این کد رو هم از همین تایپک برداشتم و نوشتم)

pic varbinary(1000) نوع فیلد عکس




var
S : TMemoryStream;
sql_command:string;
begin

S := TMemoryStream.Create;
s.LoadFromFile(OpenPictureDialog.FileName);

sql_command:=insert into personel_pic(name,family,pic)values('+''''+edit_na me.text+''''+','+''''+edit_family.text+''''+','+'' ''+TBlobField(s)+''''+')';

ADOQuery1.Close;
ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Add(sql_command);
ADOQuery1.ExecSQL;
ADOQuery1.Close;


end;
khoshblagh
سه شنبه 21 فروردین 1397, 19:02 عصر
با سلام
حداقل عکس پیام خطا هم ضمیمه میکردید.
majid2
چهارشنبه 22 فروردین 1397, 20:42 عصر
سلام
موقع اجرای برنامه این خطا رو میده باید چکار کنم؟

147925
khoshblagh
یک شنبه 26 فروردین 1397, 17:53 عصر
TPersistent = class(TObject)
khorsandreza
سه شنبه 28 فروردین 1397, 00:10 صبح
سلام
موقع اجرای برنامه این خطا رو میده باید چکار کنم؟

147925
بجای دستور Assign ازLoadFromStrem استفاده کنید

VlStream := TFileStream.Create(_Jpg File name, fmOpenRead or fmShareDenyWrite);
VlStream.Seek(0, soFromBeginning);
.
.
.
AdoQuery.parametr[2].LoadFromStream(vlStream,ftBlob);