Subject | Re: [IBO] Storing Images In JPEG format in BLOB Field. |
---|---|
Author | R. S. Patil |
Post date | 2001-04-03T09:06:47Z |
I am Cutting from Some Image Capturing Software, doing some
processing there like cropping,
rotating etc etc and then using select rectangle and copy to
clipboard.
then using paste command.
processing there like cropping,
rotating etc etc and then using select rectangle and copy to
clipboard.
then using paste command.
> > >the exception is can not assign TMETAFile to TJPEGImage.
> > > procedure TIB_CustomJPEGImage.PasteFromClipboard;
> > > var JPEG: TJpegImage;
> > > begin
> > > if Clipboard.HasFormat(CF_PICTURE) and DataLink.Modify then begin
> > > JPEG := TJpegImage.Create;
> > > try
> > > Picture.Assign(Clipboard);
> > > JPEG.Assign(Picture.Graphic);
> >
> > ************* Raised Exception Here **********************
> >
> > > Picture.Graphic := JPEG;
> > > finally
> > > JPEG.Free;
> > > end;
> > > end;
> > > end;