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
 TImageEnMView.AppendImage overload needed

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
PeterPanino Posted - Feb 28 2024 : 07:50:25
I need this TImageEnMView.AppendImage overload:

procedure AppendImage(Bitmap: TIEBitmap;
                      DefaultTopText: TIEImageEnMViewDefaultText = iedtNone;
                      DefaultInfoText: TIEImageEnMViewDefaultText = iedtNone;
                      DefaultBottomText: TIEImageEnMViewDefaultText = iedtNone);


This would make appending TIEBitmap images easier.
1   L A T E S T    R E P L I E S    (Newest First)
xequte Posted - Feb 28 2024 : 14:23:31
Hi

You should add it as a helper function to your code:

procedure TImageEnMViewHelper.AppendImage(Bitmap: TIEBitmap;
                                          DefaultTopText: TIEImageEnMViewDefaultText = iedtNone;
                                          DefaultInfoText: TIEImageEnMViewDefaultText = iedtNone;
                                          DefaultBottomText: TIEImageEnMViewDefaultText = iedtNone);
begin
  AppendImage( Bitmap );
  ImageTopText[ Result ]    := IEMDefaultTextToConst(DefaultTopText);
  ImageInfoText[ Result ]   := IEMDefaultTextToConst(DefaultInfoText);
  ImageBottomText[ Result ] := IEMDefaultTextToConst(DefaultBottomText);
end;


Nigel
Xequte Software
www.imageen.com