26-04-2012, 10:23 PM
لماذا يضهر لي هذا الخطا؟؟؟
cannot assign a TJPEG to TImage
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;