TAdvOfficePager OnShow event

Hi,
I have a question about the TAdvOfficePage component.

The OnShow event is executed twice when a page becomes active. Is there a reason for this or is it a bug?

I am using the lastest version from TMS Component Pack 6.4.7.0 with Delphi 7 update 1

The behavior can esailly be reproduced in a new application.
 - Drop a TAdvOfficePager
 - On one oe the TAdvOfficePage add an OnShow event with code so that you can put a breakpoint.
- When you switch to the AdvOfficePage in questin, the OnShow event will run twice.

Is this normal?
Thanks

We have traced and fixed this issue.