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
 Thumbnail Strecth on Viewer

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
wesleybobato Posted - Oct 25 2012 : 13:54:12
Hello would like to know if it is possible to Fill the entire space of the Thumbnail of the image Loaded as always is a margin I'd like the loaded image takes up all the space of the Thumbnail
Thanks for reading and responding.

10   L A T E S T    R E P L I E S    (Newest First)
wesleybobato Posted - Mar 26 2013 : 10:42:55
Thank You Willian.
w2m Posted - Mar 26 2013 : 07:58:56
See if this gives to the result you are looking for:
procedure TForm6.Splitter1Moved(Sender: TObject);
begin
  // resize the thumbnails and allow room for selection to be fully visible
  if ImageEnMView1.ThumbWidth < ImageEnMView1.ClientHeight then
    ImageEnMView1.ThumbWidth := (ImageEnMView1.ClientHeight - (ImageEnMView1.HorizBorder * 2))
  else
    ImageEnMView1.ThumbWidth := ImageEnMView1.ClientHeight - (ImageEnMView1.VertBorder * 2) div 3;
  ImageEnMView1.ThumbHeight := ImageEnMView1.ClientHeight - (ImageEnMView1.VertBorder * 2);
  ImageEnMView1.Update;
  if ImageEnMView1.SelectedImage <> -1 then
    // Keep selected image visible
    ImageEnMView1.DisplayImageAt(ImageEnMView1.SelectedImage, 0, ImageEnMView1.SelectedImage);
end;



342.65 KB
William Miller
Adirondack Software & Graphics
Email: w2m@frontiernet.net
EBook: http://www.imageen.com/ebook/
Apprehend: http://www.frontiernet.net/~w2m/index.html
wesleybobato Posted - Mar 26 2013 : 05:23:46
Hello Nigel please check the attached examples in DropBox
Could you help me please thank you nigel.

https://www.dropbox.com/s/xtr7yw59h09b2nx/Resize.zip
xequte Posted - Mar 25 2013 : 20:25:37
Sorry Wesley,

Can you explain that in more detail...

Nigel
Xequte Software
www.xequte.com
nigel@xequte.com
wesleybobato Posted - Mar 25 2013 : 15:57:14
Hello Bill is Possible you help me again.
I would like to Deichar TImageEnMView and TSplitter Aligned to Top TImageENView and aligned to the client would like the code to Work Properly since I'm not getting.

Thank you for your attention.
wesleybobato Posted - Nov 06 2012 : 03:50:59
Hello thank you very much for your Reply I will Wait for your next update an option to do this.
a hug.
xequte Posted - Oct 27 2012 : 02:40:20
Hi

There is not an easy way to do this on-the-fly, but it could be a good enhancement for a later update.

Nigel
Xequte Software
www.xequte.com
nigel@xequte.com
wesleybobato Posted - Oct 26 2012 : 05:29:18
I found an example in the Page Below.
http://www.imageen.com/info/index.html
It is possible you send us this example to study.
Because the Thumbnail this equal google picasa oculpando the whole space.
Thanks for reading and Responding.


wesleybobato Posted - Oct 26 2012 : 05:13:49
Thank you very much for your help.
I put a sample image with the Thumbnail of Google Picasa Realizes that it fills the entire space of the Thumbnail does not Get equal Edge the TImageEnMView is possible I make the Thumbnail not deiche border space and be equal the thumbnail google picasa.
Thanks for reading and Responding.

w2m Posted - Oct 25 2012 : 15:27:25
Set the ImageEnMView1.Style to iemsFlat and align ImageEnMView = alLeft; Then add a TSplitter on the right side of the ImageEnMview.

Then write:
procedure TForm1.Splitter1Moved(Sender: TObject);
begin
  // resize the thumbnails and allow room for selection to be fully visible
  ImageEnMView1.ThumbWidth := ImageEnMView1.ClientWidth - (ImageEnMView1.HorizBorder * 2);
  ImageEnMView1.ThumbHeight := ImageEnMView1.ClientWidth - (ImageEnMView1.HorizBorder * 2);
  ImageEnMView1.Update;
  if ImageEnMView1.SelectedImage <> -1 then
    // Keep selected image visible
    ImageEnMView1.DisplayImageAt(ImageEnMView1.SelectedImage, 0, ImageEnMView1.SelectedImage);
end;

The thumbnail will fill the entire ImageEnMView client area minus an adjustment for the HorizBorder. When you move the splitter then ImageEnMView resizes itself so you can adjust the width of the thumbnails baised on the on the ImageEnMView clientwidth.

Stretched Small

408.3 KB

Stretched Medium

533.23 KB

In this example the splitter is colored an ugly black so it is easy to see.
William Miller
Adirondack Software & Graphics
Email: w2m@frontiernet.net
EBook: http://www.imageen.com/ebook/
Apprehend: http://www.frontiernet.net/~w2m/index.html