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: 23:10:56 11/07/03 Fri
Author: JK
Subject: Re: HOW TO PRINT CURRENT VIEW EXCEPT SELECTION !
In reply to: Michel 's message, "Re: PRINT CURRENT VIEW - DOESNT WORK !" on 07:50:50 11/07/03 Fri


Michel,

I colud print a selected area having ExtractSelection, but
What i hope to know is how to print current view except
selection ?

Regards,JK


>
>Hi JK,
>
>I'm sorry about that, indeed the suggestion I gave you
>prints the entire graphic.
>
>To print the selected part of a TImageScrollBox:
>
>Grahpic := TDibGraphic.Create;
>(ImageScrollBox.MouseHandler as
>TRubberbandMouseHandler).ExtractSelection(Dest);
>
>DibPrinter.PrintMode := ?
>DibPrinter.Width := ?
>DibPrinter.Height := ?
>
>DibPrinter.Print(Graphic);
>Graphic.Free;
>
>Best regards,
>
>Michel
>
>
>>
>> Hi Michel,
>>
>> I couldnt print a zoomed zrea or a displayed current
>>view
>> image with DisplayedGraphic. In that case, Full page
>>was
>> printed. My code like below. Please check my code !
>>
>> try
>> GraphicPrinter := TDibGraphicPrinter.Create;
>> GraphicPrinter.UsePrintJob := True;
>> GraphicPrinter.Title := 'aaa-auto';
>>
>>GraphicPrinter.Print(ImageScrollBox.DisplayedGraphic);
>> finally
>> GraphicPrinter.Free;
>> end;
>>
>> Many thanks,JK
>>
>>>
>>>Hi JK,
>>>
>>>I have a feeling from your other post that you have
>>>figured it out.
>>>
>>>Use the TDibGraphicPrinter object. You can print the
>>>original (not zoomed graphic) by doing
>>>
>>>GraphicPrinter.Print( ImageScrollBox.Graphic )
>>>
>>>or you can print the displayed (zoomed graphic)
>using,
>>>
>>>GraphicPrinter.Print( ImageScrollBox.DisplayedGraphic
>>)
>>>
>>>
>>>Best regards,
>>>
>>>Michel
>>>
>>>
>>>>
>>>> I want to konw how to print a displayed current
>>image
>>>>?
>>>> After ZoomIn/Out or ZoomArea, ImageScrollBox has
>new
>>>> display. I want to print the image.
>>>>
>>>> Regards,JK

[ Next Thread | Previous Thread | Next Message | Previous Message ]
[ 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.