trichview.com

trichview.support




Re: sample / info Method SetItemExtraIntProperty


Return to index


Author

Message

Ricardo Bas

Posted: 07/09/2002 21:30:26


Thank you for the example. It works now.


All the best,


Ricardo



s2o wrote in message <3d238e0f@support.torry.net>...

>

>> I need to change the size of an image in my rve. I know i need to use the

>> SetItemExtraIntProperty method. Only i don't know how. Does anyone have a

>> little example?

>

>This is from an old msg of Sergey in this newsgroup:

>

>Size adjustment is available for standard implementation of metafiles, bmp

>

>and jpeg.

>

>It is not available for icons.

>

>There are several different gif implementations, you can test them

yourself.

>

>This code scales the current image (in the position of caret) to 100 x 100:

>

>// minimal code:

>

>if rve.CurItemStyle in [rvsPicture, rvsHotPicture] then

>

>begin

>

>RichViewEdit1.SetCurrentItemExtraIntProperty(rvepImageHeight, 100, False);

>

>RichViewEdit1.SetCurrentItemExtraIntProperty(rvepImageWidth, 100, True);

>

>end;

>

>

>

>OR

>

>

>

>// if you want these operations to be undone as one operation:

>

>if rve.CurItemStyle in [rvsPicture, rvsHotPicture] then

>

>begin

>

>MyRichViewEdit.BeginUndoGroup(rvutModifyItem);

>

>MyRichViewEdit.SetUndoGroupMode(True);

>

>RichViewEdit1.SetCurrentItemExtraIntProperty(rvepImageHeight, 100, False);

>

>RichViewEdit1.SetCurrentItemExtraIntProperty(rvepImageWidth, 100, True);

>

>MyRichViewEdit.SetUndoGroupMode(False);

>

>end;

>

>

>

>





Powered by ABC Amber Outlook Express Converter