ImageEn for Delphi and C++ Builder ImageEn for Delphi and C++ Builder

 

ImageEn Forum
Profile    Join    Active Topics    Forum FAQ    Search this forumSearch
Forum membership is Free!  Click Join to sign-up
Username:
 Password:
Save Password
Forgot your Password?

 All Forums
 ImageEn Library for Delphi, C++ and .Net
 ImageEn and IEvolution Support Forum
 Insert and Select with TImgaeEnVect		  New Topic  Reply to Topic
Author Previous Topic Topic Next Topic  

HeinzPo

8 Posts
Posted - Apr 21 2014 :  16:18:49  Show Profile  Reply
I am a absolute beginner.

I make a line with arrow as following:

procedure TEditF.Button2Click(Sender: TObject);
begin
fEdit.MouseInteractVt := fEdit.MouseInteractVt + [miPutLine];
fEdit.ObjPenColor[IEV_NEXT_INSERTED_OBJECT] := clRed;
fEdit.ObjPenWidth[IEV_NEXT_INSERTED_OBJECT] := 16;
fEdit.ObjBeginShape[IEV_NEXT_INSERTED_OBJECT] := iesOUTARROW;
fEdit.ObjEndShape [IEV_NEXT_INSERTED_OBJECT] := iesNONE;
fEdit.ObjShapeHeight[IEV_NEXT_INSERTED_OBJECT] := 35;
fEdit.ObjShapeWidth[IEV_NEXT_INSERTED_OBJECT] := 35;
end;

After the insert I like to select the object for moving, but I can only insert other lines.

Which is the right way?

w2m

USA
1990 Posts
Posted - Apr 21 2014 :  16:42:09  Show Profile  Reply
Add a button to your form. Then add this to the button's OnClick Event:
fEdit.MouseInteractVt := [miObjectSelect];

After clicking the button you can select the objects.

William Miller
Adirondack Software & Graphics
Email: w2m@frontiernet.net
EBook: http://www.imageen.com/ebook/
Apprehend: http://www.frontiernet.net/~w2m/index.html
Custom ImageEn Development
Go to Top of Page

HeinzPo

8 Posts
Posted - Apr 21 2014 :  22:12:25  Show Profile  Reply
Okay, thanks.

I thought there will a way without button.
A automatic way for selection after inserting every line.

Best regards, Olaf
Go to Top of Page

w2m

USA
1990 Posts
Posted - Apr 22 2014 :  07:22:41  Show Profile  Reply
I suppose you could try putting fEdit.MouseInteractVt := [miObjectSelect] in the OnAfterDrawObject event.

William Miller
Go to Top of Page

exchangeviews

India
39 Posts
Posted - Sep 20 2014 :  23:37:01  Show Profile  Reply
You could try putting fEdit.MouseInteractVt := [miObjectSelect] in the SelectObject event. Reply if it works for you. I think no need to add a button to your form to select object.
Go to Top of Page
  Previous Topic Topic Next Topic  
 New Topic  Reply to Topic
Jump To: