VoyForums

[ VoyUser Login optional ] [ 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: 17:59:11 05/31/02 Fri
Author: Michel
Subject: Re: Is it possible to programmatically set an "Rubberband"-area
In reply to: Paul 's message, "Re: Is it possible to programmatically set an "Rubberband"-area" on 04:12:51 05/31/02 Fri


Hi Paul,

I forgot the Canvas property:

IMSB.Graphic.Canvas.Draw( X, Y, Graphic )

Sorry about that,

Best regards,

Michel

>Hi Michel,
>
>IMSB.Graphic.Draw( X, Y, Graphic ) returns an error:
>
>"Incompatible Types: TCanvas and Integer"
>
>Ok, I'll try to explain what I want to do. I have two
>Tiff-images. I load the first image into an
>ImageScrollbox, then I want to copy the
>second(smaller) into a region of the first one. And
>all that without using the mouse (or even
>ImageScrollbox if that is possible).
>
>Thanks in advance
>Paul
>
>
>
>>
>>Hi Paul,
>>
>>I am not sure I understand you properly, but a simpler
>>way to do this would be to copy the graphic into
>>another graphic using the Canvas property:
>>
>>IMSB.Graphic.Draw( X, Y, Graphic )
>>
>>where X,Y is the upper left corner of the selection
>>rect.
>>
>>Best regards,
>>
>>Michel
>>
>>
>>>Hi!
>>>
>>>Without any mouse interaction I want to copy and
>paste
>>>a tiff-image into another. Like this:
>>>
>>>ATiff: TTiffGraphic;
>>>IMSB: TImageScrollBox;
>>>ATiff.LoadFromStream();
>>>.
>>>.
>>>.
>>>Graphic := TDibGraphic.Create;
>>> try
>>> Graphic.Assign(ATiff);
>>> //programmatically create an
>"rubberband"-area
>>> IMSB.MouseMode := mmUser;
>>> RubberbandHandler := IMSB.MouseHandler as
>>>TRubberbandMouseHandler;
>>> SetSelection() .... //how to do this?
>>> IMSB.CopyGraphicIntoSelection(Graphic);
>>> IMSB.Redraw(True);
>>> finally
>>> Graphic.Free;
>>> end

[ Next Thread | Previous Thread | Next Message | Previous Message ]
[ Contact Forum Admin ]

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