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
 Cut /Copy/Paste problem ImageEnVect
 New Topic  Reply to Topic
Author Previous Topic Topic Next Topic  

rswyman@docuxplorer.com

USA
156 Posts

Posted - Aug 06 2016 :  10:56:05  Show Profile  Reply
Hi All,

Attached is a project that has two forms. The first has a TAction with copy, cut and paste actions with short cuts assigned and linked to a TMainmenu. An TEdit control is also on the form. A second form is created via a TButton and is displayed via the ShowModal method. On the second form is a TImageEnVect control, TEdit and a TButton that sets the properties for a note annotation. You can click on the TImageEnVect and create the note annotation and edit its text with the cut/copy and paste short cut keys but if you change the .ShowModal to .Show you loose the cut/copy and paste short cut key functionality for the note annotation. The TEdit control works as it should on the second form.

I'm using Delphi XE with Imageen 6.3

attach/rswyman@docuxplorer.com/201686104720_Test.zip
985.2 KB

Thanks in advance for your thoughts

Ron

w2m

USA
1990 Posts

Posted - Aug 06 2016 :  13:14:41  Show Profile  Reply
I do not know why the TEdit action functions with a modal form, but does not work when using a modeless form. Nigel may know or perhaps other problem websites like Stackoverflow may provide and answer. There is no TImageEnVect action that copies the vectorial objects text to the clipboard so I added come code to TImageEnVectorial events to copy the selected object's text to the clipboard. This seems to solve your problem.

The code I used was this:
procedure TForm2.ImageEnVect1TextEdit(Sender: TObject; hobj: Integer; VisualObject: TObject);
var
  i: integer;
begin
  for i := 0 to ImageEnVect1.SelObjectsCount - 1 do
  begin
    HObj := ImageEnVect1.GetObjFromIndex(i);
    if ImageEnVect1.IsSelObject(HObj) then
    begin
      if HObj <> -1 then
      begin
        Clipboard.AsText := ImageEnVect1.ObjText[HObj]
      end;
    end;
  end;
end;

I also added the code to two other TImageEnVect events.

So for the moment, the function you are trying to achieve works, but it does not explain the modeless problem with the action.

You may download a revised demo here:
attach/w2m/201686131340_VectorialAnnotations.zip
198.14 KB

Bill Miller
Adirondack Software & Graphics
Email: w2m@hughes.net
EBook: http://www.imageen.com/ebook/
Custom Commercial ImageEn Development
Go to Top of Page

rswyman@docuxplorer.com

USA
156 Posts

Posted - Aug 06 2016 :  17:01:10  Show Profile  Reply
Thanks for the effort Bill. I think Nigel should conceder this a bug since other controls behave as expected.
Go to Top of Page

xequte

39053 Posts

Posted - Aug 21 2016 :  21:49:22  Show Profile  Reply
Hi Ron

The text object in ImageEnVect is simply a TEdit, so I'm not sure why it is behaving differently from a TEdit on the form. Presumably the key presses are being eaten, but I'm not seeing this occur in the parent components.

We'll need to investigate in more depth at a later date.


Nigel
Xequte Software
www.xequte.com
nigel@xequte.com
Go to Top of Page

rswyman@docuxplorer.com

USA
156 Posts

Posted - Sep 01 2016 :  12:34:18  Show Profile  Reply
will this fix be in the next release 6.3.?
Go to Top of Page

xequte

39053 Posts

Posted - Sep 01 2016 :  18:15:09  Show Profile  Reply
No, I'm afraid we have not found a solution to that.

Nigel
Xequte Software
www.xequte.com
nigel@xequte.com
Go to Top of Page

rswyman@docuxplorer.com

USA
156 Posts

Posted - Sep 01 2016 :  18:44:12  Show Profile  Reply
Can I tell my clients that this will be fixed before the end of the year?
Go to Top of Page

xequte

39053 Posts

Posted - Sep 01 2016 :  21:41:07  Show Profile  Reply
Hi Ron

Sorry it is not possible to comment on the implementation of specific features and bug fixes. We have many items on our to-do list and work through them as practically as possible.

I could not find any cause for this issue in my initial invesigation, so a more in-depth look will be much more time consuming. This makes it harder to prioritize above issues that are more commonly encountered and can be resolved quickly.

Nigel
Xequte Software
www.xequte.com
nigel@xequte.com
Go to Top of Page

rswyman@docuxplorer.com

USA
156 Posts

Posted - Sep 02 2016 :  08:57:07  Show Profile  Reply
I understand completely but please take in account that this problem has existed since version 1 for our clients. We had reported back then but we were not been able to reproduce it outside of our application. Is only now that we have determined a method to demonstrating this to you without our own code. I hope this pleads our case for a resolution sooner than later.

Thank you for your consideration
Ron
Go to Top of Page

xequte

39053 Posts

Posted - Feb 09 2017 :  20:11:27  Show Profile  Reply
Hi

No, I'm afraid we have been unable to investigate this further.

Nigel
Xequte Software
www.xequte.com
nigel@xequte.com
Go to Top of Page

rswyman@docuxplorer.com

USA
156 Posts

Posted - Jun 30 2018 :  21:35:30  Show Profile  Reply
Any update on this bug?
Go to Top of Page
  Previous Topic Topic Next Topic  
 New Topic  Reply to Topic
Jump To: