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: 12[3]45678910 ]


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

Date Posted: 20:31:28 04/22/03 Tue
Author: Michel
Subject: Re: Demo Limitations?
In reply to: Mitch Wolberg 's message, "Demo Limitations?" on 16:41:08 04/22/03 Tue


Hi Mitch,

There is not limitation as such.

Your sample code looks ok, but I don't see any interaction with the TImageScrollBox. You can use,

ImageScrollBox.LoadFromFile(SaveDlg.FileName, 1);

after the sharpen. Or you can use the Graphic property.

Best regards,

Michel

>I'm evaluating the Envision library for a project
>working with very large B/W Tiff G4 iamges. These
>files may be 10,000 or more pixels high by 2,000 or
>more wide. They consist of a horizontal and vertical
>grid with several curves. The problem is to view the
>entire image on the screen and still be able to see
>the curves.
>
>Working with the TImageScrollBox I can use the Sharpen
>transform and see a noticeable improvement. If I just
>run the Sharpen transform on the graphic and save it
>there is very little difference. Is this a limitation
>of the demo version or do I need to use the
>TImageScrollbox to see these changes?
>
>Here's the code I'm using for the offscreen sharpening:
>
>procedure TForm1.Sharpen2Click(Sender: TObject);
>var
> tif : TTiffGraphic ;
> shrp : TSharpenTransform ;
>begin
>
> if OpenDlg.Execute and SaveDlg.Execute then begin
> tif := TTiffGraphic.Create ;
> tif.LoadFromFile ( OpenDlg.FileName ) ;
> shrp := TSharpenTransform.Create ;
> shrp.Apply ( tif ) ;
> shrp.Free ;
> tif.SaveToFile ( SaveDlg.FileName ) ;
> tif.Free ;
> end ;
>end;
>
>Mitch

[ 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.