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

 

ImageEn Forum
Profile    Join    Active Topics    Forum FAQ    Search this forumSearch
 All Forums
 ImageEn Library for Delphi, C++ and .Net
 ImageEn and IEvolution Support Forum
 Layers and MouseInteract

Note: You must be registered in order to post a reply.
To register, click here. Registration is FREE!

View 
UserName:
Password:
Format  Bold Italicized Underline  Align Left Centered Align Right  Horizontal Rule  Insert Hyperlink   Browse for an image to attach to your post Browse for a zip to attach to your post Insert Code  Insert Quote Insert List
   
Message 

 

Emoji
Smile [:)] Big Smile [:D] Cool [8D] Blush [:I]
Tongue [:P] Evil [):] Wink [;)] Black Eye [B)]
Frown [:(] Shocked [:0] Angry [:(!] Sleepy [|)]
Kisses [:X] Approve [^] Disapprove [V] Question [?]

 
Check here to subscribe to this topic.
   

T O P I C    R E V I E W
mhieta Posted - Jul 24 2019 : 08:48:36
Hi,

I'm using ImageEn 8.6.0 now and I have few issues with Layers.
I have few buttons and here is the code from them:

  else if SpeedButton29.down then
  begin
    if not FullScreenwithMenu1.Checked then RightScrollBox.Visible := True;
    (ActiveMDIChild as TMDIChild).ImageEnView1.DeSelect;
    (ActiveMDIChild as TMDIChild).ImageEnView1.LayersDeselectAll();
    IEGlobalSettings().DefaultLayerShape := iesRectangle;
    (ActiveMDIChild as TMDIChild).ImageEnView1.MouseInteractLayers := [ mlCreateShapeLayers ];
    (ActiveMDIChild as TMDIChild).ImageEnView1.Cursor := 1785;
    PopupMenu1.AutoPopup := true;
  end

  else if SpeedButton25.down then
  begin
    if not FullScreenwithMenu1.Checked then RightScrollBox.Visible := True;
    (ActiveMDIChild as TMDIChild).ImageEnView1.DeSelect;
    (ActiveMDIChild as TMDIChild).ImageEnView1.LayersDeselectAll();
    (ActiveMDIChild as TMDIChild).ImageEnView1.MouseInteractLayers := [ mlMoveLayers, mlResizeLayers ];
    (ActiveMDIChild as TMDIChild).ImageEnView1.Cursor := 1785;
    PopupMenu1.AutoPopup := true;
  end

And if I do this:
  if (ActiveMDIChild as TMDIChild).ImageEnView1.Selected then
  begin
    (ActiveMDIChild as TMDIChild).ImageEnView1.LayersCreateFromSelection();
    (ActiveMDIChild as TMDIChild).ImageEnView1.Deselect;
    (ActiveMDIChild as TMDIChild).ImageEnView1.CurrentLayer.Selected:=True;
    (ActiveMDIChild as TMDIChild).ImageEnView1.Update;
  end;

Then if I select that SpeedButton25 I cannot make Layer Selection correctly, but if I do this in SpeedButton25:
(ActiveMDIChild as TMDIChild).ImageEnView1.MouseInteractLayers := [ mlCreateShapeLayers ];
(ActiveMDIChild as TMDIChild).ImageEnView1.MouseInteractLayers := [ mlMoveLayers, mlResizeLayers ];
Then I can move that created Layer. So is the better way to make Layer selection after creating Layer from selection?
2   L A T E S T    R E P L I E S    (Newest First)
mhieta Posted - Jul 25 2019 : 07:00:08
Hi,

Ok, that ImageEnView1.MouseInteractGeneral := []; helped. Thanks.
I will email to you to receive latest fixes.

Regards Marko
xequte Posted - Jul 25 2019 : 04:32:32
Hi

Unfortunately there seems to be an issue in 8.6.0 where MouseInteractGeneral is not reset fully when setting MouseInteractLayers.

Please call:

ImageEnView1.MouseInteractGeneral := [];

Before:

ImageEnView1.MouseInteractLayers := [ mlMoveLayers, mlResizeLayers ];

Or email me for a source update.

Nigel
Xequte Software
www.imageen.com