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
 Access violation in LoadFromFileAuto
 New Topic  Reply to Topic
Author Previous Topic Topic Next Topic  

Steven Aertssen

Belgium
9 Posts

Posted - Jun 20 2013 :  06:02:55  Show Profile  Reply
Hi,

we recently updated ImageEn from version 4.0.2 to 4.3.1.
In the new version, we get an access violation when loading a dicom image.
For your testing purposes, I'll attach a zip file containing the image.


Please try the following.
Create an empty project and put a TImageEnView object on your form.
In the constructor, put the following code:

myImageEnView->IO->LoadFromFileAuto("R1.rvg");

This will give you an access violation. I tested the same thing in version 4.0.2 and this works with no problems.

Can you please provide a solution?
Thanks!
Steven


Download Attachment: 201362055846_R1.zip

fab

1310 Posts

Posted - Jun 20 2013 :  07:16:42  Show Profile  Reply
Hi,
many thanks for the useful file.
Next minor release will fix this problem. If you want to patch it now please open iedicom.pas and locate the rows (in ReadTag function):
....
          case element of
            $0002:  // Samples per Pixel
              SamplesPerPixel := dataint;
            $0004:  // photometric interpretation
              PhotometricInterpretation := AnsiString(data);
....

before the "case" statement insert:

if tags = IOParams.DICOM_Tags then


Hope this helps.
Go to Top of Page

Steven Aertssen

Belgium
9 Posts

Posted - Jun 21 2013 :  05:51:36  Show Profile  Reply
Hi Fab,

thank you for the quick reply.
I'm afraid it didn't help.

Here is what I did:

I altered the code as follows:
....
if tags = IOParams.DICOM_Tags then case element of
$0002: // Samples per Pixel
SamplesPerPixel := dataint;
$0004: // photometric interpretation
PhotometricInterpretation := AnsiString(data);
....
Then I did a rebuild of
- PKIECtrl15.dpk
- PKIEDB15.dpk

I then retested my exe with the new bpl files.
I still get an access violation.

Sincerely,
Steven Aertssen
Go to Top of Page

Steven Aertssen

Belgium
9 Posts

Posted - Jun 26 2013 :  06:53:48  Show Profile  Reply
Hi Fab,

have you been able to look at this already?
Thanks,
Steven
Go to Top of Page

fab

1310 Posts

Posted - Jun 26 2013 :  11:01:06  Show Profile  Reply
Please write in private, I will send the full fixed iedicom.pas file.
Go to Top of Page
  Previous Topic Topic Next Topic  
 New Topic  Reply to Topic
Jump To: