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
 Text Arrow Demo		  New Topic  Reply to Topic
Author Previous Topic Topic Next Topic  

Matthew T

USA
21 Posts
Posted - Jun 21 2012 :  12:57:25  Show Profile  Reply
Hi,

I am using a control similar to the Text Arrow Demo. The user wants to draw the TextArrow and then clear the Edit box after the item is drawn. When I change the editbox, the current object is still selected so the last text arrow caption changes as well.

How do I clear the edit without clearing the last caption? I also want to change the focus back to the edit after the last item was drawn.

Thanks,


Matthew

fab

1310 Posts
Posted - Jun 24 2012 :  23:58:24  Show Profile  Reply
Hi,
you could remove the code inside TForm1.Edit1Change and change the code in TForm1.ImageEnVect1NewObject to:

procedure TForm1.ImageEnVect1NewObject(Sender: TObject; hobj: Integer);
begin
  imageenvect1.ObjText[hobj] := Edit1.text;
  Edit1.Text := '';
end;
Go to Top of Page

Matthew T

USA
21 Posts
Posted - Jun 26 2012 :  15:13:43  Show Profile  Reply
Thanks - worked fine.

Matthew
Go to Top of Page
  Previous Topic Topic Next Topic  
 New Topic  Reply to Topic
Jump To: