مشكلة : cannot assign a TJPEG to TImage

[yassine_hell]

لماذا يضهر لي هذا الخطا؟؟؟
cannot assign a TJPEG to TImage

PHP كود :

var S :  TStream;
   JpegImage: TJPEGImage;
begin
  JpegImage := TJPEGImage.Create;
  //S := TStream.Create;
  S := ADOQuery1.CreateBlobStream(ADOQuery1.FieldByName('img'),bmRead);

  S.Position := 0 ;
  JpegImage.LoadFromStream(s);

  //JpegImage.SaveToFile('d:\yass.jpg');
  Image1.Assign(JpegImage);
  //Image1.Picture.LoadFromFile('d:\yass.jpg');
end; 


[xinofix]

الأخ المبرمج
لاتوجد علاقة بين المعرفات، ويبدوا من خلال النظر أن هناك رسائل تنبيهية أهملتها من نوع Warning
هناك عدم ارتباط او علاقة بين كل من s, jpegimage, stream
أحيانا المترجم لن يوقفك عند خطأ ولكنه ينبهك بأن هناك متغيرات او معرفات لن تكون في الحسبان
اي لن تكون لها قيمة وبالرغم من هذا فالبرنامج سيشتغل لكن سيتم اهمال تلك المتغيرات
حينما يكون التنبيه من نوع Hint فالبرنامج لن يهمل العملية بينما حينما تكون على الشكل Warning لن يتم اخذها بعين الاعتبار