## Bug in Picshow component ???

Please post bug reports, feature requests, or any question regarding the DELPHI AREA projects here.

### Bug in Picshow component ???

Hello,

I initialize PicShow compoenent with following details:

PicShow.Picture.LoadFromFile('C:\1.BMP'); // dimensions are 704 x 576
PicShow.Picture.Bitmap.PixelFormat := pf24bit;

Now when I try to do this:
PicShow.Execute;

I get Access Violation error message @ line 567 in PSEffect module. I'm getting this error only when I select 'Fade' style. Please help me in fixing this issue.

Regards,

Terry Bogard
Terry
Member

Posts: 3
Joined: September 6th, 2003, 11:23 am

You do not need to set the bitmap format as follow.

Code: Select all
PicShow.Picture.Bitmap.PixelFormat := pf24bit;

The component itself make a copy of the image and changes its format to one that's more suitable for the active effect.

Could you please post the bitmap here? And what are your Windows, Delphi, and PicShow versions?

Kambiz

Posts: 2430
Joined: March 7th, 2003, 7:10 pm

Hi,

I'm using Picshow v3.05 in Delphi 7 and operating system is Windows XP Professional 2002 Service Pack 1. I'm also attaching one of the BMPs.

There is also another bug in PicShow component and its details are as follows:

when i try to assign a transition effect by setting StyleName property I get Access Voilation error message. I have fixed this bug by modifying line 614 in procedure TCustomPicShow.SetStyleName. The old code was:

for TheStyle := Low(TShowStyle) to High(TShowStyle) do

The modified version is:

for TheStyle := 1 to High(TShowStyle) do

Kind Regards,

Terry
Terry
Member

Posts: 3
Joined: September 6th, 2003, 11:23 am

Thank you so much for the bug fix.

I guess the first reported AV exception was related to the second one, because on my machine your code works without any problem.

Are you still getting the AV exception?

Kambiz

Posts: 2430
Joined: March 7th, 2003, 7:10 pm

I'm really sorry that I missed an important point while stating the problem. The problem occurs on selective Styles e.g. Fade. Following is the exact code I'm testing:

PicShow.Execute;

// Access Voilation error message
Terry
Member

Posts: 3
Joined: September 6th, 2003, 11:23 am

I tried your code with the attached image, and there was no problem at all.

Please try to delete all PicShow's dcu files and rebuild your package. It may solve the problem.

Kambiz