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
 Bug in SaveImageEnDialog, Save as type with Vista		  New Topic  Reply to Topic
Author Previous Topic Topic Next Topic  

mhieta

Finland
78 Posts
Posted - Feb 14 2012 :  10:23:28  Show Profile  Reply
Hi,

I'm using ImageEn Pre 4.1.0 (where mpeg Vista issue is fixed previously).

In SaveImageEnDialog, when changing Save as type ex. from tiff to jpeg file list is not updating/refreshing (you can get file list with F5). This file list updating/refresing works correctly with OpenImageEnDialog.

Also I checked that this Save as type changing works in 3.0.5 version and its broken in 3.1.1 too.

- Marko

fab

1310 Posts
Posted - Feb 14 2012 :  12:25:49  Show Profile  Reply
Hi,
which Delphi version are you using?
Go to Top of Page

mhieta

Finland
78 Posts
Posted - Feb 14 2012 :  12:42:23  Show Profile  Reply
I'm using Delphi 2007

- Marko
Go to Top of Page

xequte

39061 Posts
Posted - Feb 14 2012 :  17:35:36  Show Profile  Reply
Hi Marko

I cannot reproduce this under XP or Vista.



Can you send me a small project that shows it.

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

mhieta

Finland
78 Posts
Posted - Feb 15 2012 :  08:06:11  Show Profile  Reply
Hi,

In XP or Win7 I don't have see that bug. Only with Vista I see that bug.
I try to make simple app to play with it.

I will report it later.

- Marko
Go to Top of Page

mhieta

Finland
78 Posts
Posted - Feb 15 2012 :  08:21:20  Show Profile  Reply
Hi,

This is the code what I use:

SaveImageEnDialog1.Filename := OpenedFileName;
Ext:=Trim(lowercase(ExtractFileExt(OpenedFileName)));
SaveImageEnDialog1.AttachedImageEnIO := (ActiveMDIChild as TMDIChild).ImageEnView1.IO;
if (Ext = '.gif') then
begin
SaveImageEnDialog1.FilterIndex:=2;
end;
if (Ext = '.jpg') or (Ext = '.jpeg') or (Ext = '.jpe') or (Ext = '.jif') then
begin
SaveImageEnDialog1.FilterIndex:=3;
end;
if SaveImageEnDialog1.Execute then
begin
(ActiveMDIChild as TMDIChild).Caption := SaveImageEnDialog1.FileName;
(ActiveMDIChild as TMDIChild).ImageEnView1.IO.SaveToFile((ActiveMDIChild as TMDIChild).Caption);
end;

Now I can reproduce this issue when I open file what has filename: Anitan läksärit_03.jpg
Then that filelist is not updating. Also I can see one more bug. Setting SaveImageEnDialog1.FilterIndex:=2; is not working also.

Forgot to say that I set AutoSetFilter=False. And I set this filter:
SaveImageEnDialog1.Filter :=
'Tiff Bitmap (*.tif;*.tiff;*.fax;*.g3n;*.g3f;*.xif)|*.tif;*.tiff;*.fax;*.g3n;*.g3f;*.xif|' + 'CompuServe Bitmap (*.gif)|*.gif|' +
'JPEG Bitmap (*.jpg;*.jpeg;*.jpe;*.jif)|*.jpg;*.jpeg;*.jpe;*.jif|' + 'PaintBrush (*.pcx)|*.pcx|' + 'Multipage PCX (*.dcx)|*.dcx|' + 'Windows Bitmap (*.bmp;*.dib;*.rle)|*.bmp;*.dib;*.rle|' +
'Windows Icon (*.ico)|*.ico|' + 'Portable Network Graphics (*.png)|*.png|' + 'Targa Bitmap (*.tga;*.targa;*.vda;*.icb;*.vst;*.pix)|*.tga;*.targa;*.vda;*.icb;*.vst;*.pix|' + 'Photoshop Files (*.psd)|*.psd|' +
'Portable Pixmap, GrayMap, BitMap (*.pxm;*.ppm;*.pgm;*.pbm)|*.pxm;*.ppm;*.pgm;*.pbm|' + 'Wireless Bitmap (*.wbmp)|*.wbmp|' + 'JPEG2000 (*.jp2)|*.jp2|' +
'JPEG2000 Code Stream (*.j2k;*.jpc;*.j2c)|*.j2k;*.jpc;*.j2c|' + 'PostScript Level 2 (*.ps;*.eps)|*.ps;*.eps|' + 'Adobe PDF (*.pdf)|*.pdf|';

- Marko
Go to Top of Page

mhieta

Finland
78 Posts
Posted - Feb 17 2012 :  15:15:49  Show Profile  Reply
Hi,

This line: SaveImageEnDialog1.Filename := OpenedFileName;
Caused all my troubles with Save as type. And also now filelist is updating/refreshing correctly.

Now I do:
SaveImageEnDialog1.Filename :='';
if (Ext = '.gif') then
begin
SaveImageEnDialog1.FilterIndex:=2;
end;

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