+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : سؤال و جواب حول دلفي (https://delphi4arab.net/forum/forumdisplay.php?fid=15)
+--- الموضوع : كيفية تحديد الصور (حقل نوع جرافيك) في Timage (/showthread.php?tid=3718)
كيفية تحديد الصور (حقل نوع جرافيك) في Timage - nabilkeb - 24-12-2011
السلام عليكم
الفكرة تبدو بسيطة لكني تعبت دون التوصل إلى المبتغى
في المرفقات مشروع صغير يوضح الفكرة و الإشكال.
لدينا جدول يحتوي 03 حقول الأول (الكود) الثاني (الإسم) الثالث (الصورة)
الأول حقل مفتاحي - الثاني رقمي - الثالث نوع جرافيك
و لدينا أيضا بعض العناصر Timage
ـ السؤال الأول: كيف يتم تحديد صورة معينة من الجدول (سجل معين) في العنصر Image دون استعمال وسيط (العنصر DBimage ) ؟
كود :
Image1.Picture.Bitmap:=DBimage1.Picture.Bitmapالسؤال: كيف يتم تحديد صورة كل سجل في العنصر Timage على حدى ، حسب السجلات الموجودة (مع امكانية وجود سجل (حقل الصورة فارغ) من غير صورة) ؟
....المرفق....
كيفية تحديد الصور (حقل نوع جرافيك) في Timage - hanipino - 24-12-2011
و عليكم السلام
استعن بالمكون TDBCtrlGrid اعتقد انه يفى بالغرض
بالتوفيق
كيفية تحديد الصور (حقل نوع جرافيك) في Timage - mobile - 24-12-2011
كذلك الديبي قرايد الغير مجاني
كود :
http://devexpress.com/Products/Vcl/ExQuantumGrid/لكن هل من حل لكي يتعامل dbctrlgrd مع حقول من نوع blob تحوي صور من نوع jpeg او png ؟
اتمنى الاجابة لانني بحاجة للجواب ليس للاستفادة فقط
كيفية تحديد الصور (حقل نوع جرافيك) في Timage - kachwahed - 24-12-2011
Assign تقوم بنسخ حقول غرض إلى غرض آخر من نفس النمط (ينبغي استخدامها بحذر)
PHP كود :
var
Photo: TPicture;
begin
Photo := TPicture.Create;
try
if not OpenPictureDialog1.Execute then Exit;
Photo.LoadFromFile(OpenPictureDialog1.FileName);
DBImage1.DataSource.DataSet.Edit;
DBImage1.Picture.Graphic.Assign(Photo);
DBImage1.DataSource.DataSet.Post;
finally
Photo.Free;
end; // try
end;
PHP كود :
procedure TForm1.SpeedButton3Click(Sender: TObject);
begin
Table1.First;
image1.Picture.Assign(DBImage1.Picture);
وهكذا...
كيفية تحديد الصور (حقل نوع جرافيك) في Timage - mohfa - 25-12-2011
يمكن الرجوع الى :
TStream او TBlobStream
كيفية تحديد الصور (حقل نوع جرافيك) في Timage - Lam.Abdeldjalil - 25-12-2011
السلام عليكم
بإستخدام الـ TMemoryStream : إذا كان من نوع bmp (إذا لم تكون كذلك حولها )
كود :
var
MemStream: TMemoryStream;
begin
MemStream := TMemoryStream.Create;
try
TBlobField(Table1.FieldByName('img')).SaveToStream(MemStream);
MemStream.Position :=0;
Image1.Picture.Bitmap.LoadFromStream(MemStream);
finally
MemStream.Free;كيفية تحديد الصور (حقل نوع جرافيك) في Timage - nabilkeb - 26-12-2011
شكرا للجميع.
لم أنتبه إطلاقا للمكون TDBCtrlGrid. يفي بالغرض مع بعض التعديلات.
بالتوفيق للجميع