m_kafman
شنبه 31 مرداد 1388, 17:56 عصر
دوستان سلام
سوال بنده با توجه به موضوع که به ظاهر تکراری میرسه تکراری نیست
ببینید دوستان من در برنامم با استفاده از کامپوننت twain عکس رو اسکن و در image نشان میدم
از طرفی برای ذخیره سازی عکس در بانک اطلاعاتی از کد زیر استفاده میکنم
try
BlobStream :=adoquery1.CreateBlobStream(adoquery1.FieldByName ('pic1'),bmWrite);
FileStream := TFileStream.Create(axe,fmOpenRead or fmShareDenyNone);
BlobStream.CopyFrom(FileStream,FileStream.Size);
FileStream.Free;
BlobStream.Free;
adoquery1.Post;
except
adoquery1.Cancel;
در خط سوم اونجایی که نوشته..... tfilestream.create(axe,fm
متغیر axe مسیر عکس روی درایو هست یعنی این سورس رو من برای موقعی نوشتم که با استفاده از opendialog من عکس رو از مسیر مربوطه انتخاب و سپس اون مسیر تصویر در متغییر axe قرار میگیره و در بانک save میشه
اما حالا که با استفاده از اسکن تصویر رو در image نشان میدم
نمیدونم چطور در این متغییر axe بریزم تا بتونم در بانک save کنم
اگه دوستان کمک کاربردی کنن بی نهایت سپاسگذار خواهم بود
سوال بنده با توجه به موضوع که به ظاهر تکراری میرسه تکراری نیست
ببینید دوستان من در برنامم با استفاده از کامپوننت twain عکس رو اسکن و در image نشان میدم
از طرفی برای ذخیره سازی عکس در بانک اطلاعاتی از کد زیر استفاده میکنم
try
BlobStream :=adoquery1.CreateBlobStream(adoquery1.FieldByName ('pic1'),bmWrite);
FileStream := TFileStream.Create(axe,fmOpenRead or fmShareDenyNone);
BlobStream.CopyFrom(FileStream,FileStream.Size);
FileStream.Free;
BlobStream.Free;
adoquery1.Post;
except
adoquery1.Cancel;
در خط سوم اونجایی که نوشته..... tfilestream.create(axe,fm
متغیر axe مسیر عکس روی درایو هست یعنی این سورس رو من برای موقعی نوشتم که با استفاده از opendialog من عکس رو از مسیر مربوطه انتخاب و سپس اون مسیر تصویر در متغییر axe قرار میگیره و در بانک save میشه
اما حالا که با استفاده از اسکن تصویر رو در image نشان میدم
نمیدونم چطور در این متغییر axe بریزم تا بتونم در بانک save کنم
اگه دوستان کمک کاربردی کنن بی نهایت سپاسگذار خواهم بود