VoyForums
[ Show ]
Support VoyForums
[ Shrink ]
VoyForums Announcement: Programming and providing support for this service has been a labor of love since 1997. We are one of the few services online who values our users' privacy, and have never sold your information. We have even fought hard to defend your privacy in legal cases; however, we've done it with almost no financial support -- paying out of pocket to continue providing the service. Due to the issues imposed on us by advertisers, we also stopped hosting most ads on the forums many years ago. We hope you appreciate our efforts.

Show your support by donating any amount. (Note: We are still technically a for-profit company, so your contribution is not tax-deductible.) PayPal Acct: Feedback:

Donate to VoyForums (PayPal):

[ Login ] [ Contact Forum Admin ] [ Main index ] [ Post a new message ] [ Search | Check update time | Archives: 1, 2, 3, 4, 5, 6, [7], 8, 9, 10 ]

[ Next Thread | Previous Thread | Next Message | Previous Message ]

Date Posted: 07:46:14 08/30/01 Thu
Author: Michel
Subject: Re: Conversion to TImage and Bitmap confusion
In reply to: John Williams 's message, "Conversion to TImage and Bitmap confusion" on 17:09:44 08/29/01 Wed


Hi John,

ImageScrollBox.Graphic.BitmapHandle should be a valid HBITMAP. What error does the WitsEnd functions return?

>TestHandle2 := Image1.Picture.Bitmap.Handle;
>{TestHandle2 is zero at this point}

This is normal because after,

>Image1.Picture.Graphic := ImageScrollBox.Graphic;

the Graphic contained in Picture.Graphic is a TBitmapGraphic, not a VCL TBitmap.

What you can try is,

Bitmap := TBitmap.Create;
Image1.Picture.Bitmap := Bitmap;
Bitmap.Free;

Image1.Picture.Bitmap.Assign( ImageScrollBox.Graphic );

Then Image1.Picture.Bitmap.Handle should be valid.

Best regards,

Michel

>I'm using WitsEnd's barcode package to recognize a
>barcode on a scanned page and it refuses to work with
>a .Graphic.BitmapHandle from the Envision
>TImageScrollBox component but it works fine with a
>.Picture.Bitmap.Handle from the TImage component
>
>I've tried many things but this it what it boils down
>to:
>
>var
> ImageScrollBox : TImageScrollBox;
> Image1 : TImage;
>
>...
>
>ImageScrollBox.LoadFromFile( 'g:\scandocs\test.bmp', 0
>);
>
>{this is probably the wrong way to do this and what I
>need help with}
>Image1.Picture.Graphic := ImageScrollBox.Graphic;
>
>{this works - it saves a file that is identical to the
>one loaded above}
>Image1.Picture.SaveToFile( 'g:\scandocs\testx.bmp' );
>
>TestHandle1 := ImageScrollBox.Graphic.BitmapHandle;
>{TestHandle1 is non-zero at this point (but I can't
>vouch for it's validity)}
>
>TestHandle2 := Image1.Picture.Bitmap.Handle;
>{TestHandle2 is zero at this point}
>
>Thanks.

[ Next Thread | Previous Thread | Next Message | Previous Message ]

Replies:

[ Contact Forum Admin ]

Forum timezone: GMT-5
VF Version: 3.00b, ConfDB:
Before posting please read our privacy policy.
VoyForums(tm) is a Free Service from Voyager Info-Systems.
Copyright © 1998-2019 Voyager Info-Systems. All Rights Reserved.