Notebook PageIndex causes exception

[Will Blight]

Hello TP,
I have a notebook with 7 Pages, the first 4 are always visible. I hide the
pages that the user is not using and only show the pages when needed. The
problem only occurs when I try to show one of the normally hidden pages.

When I run this code, I get an exception.
Notebook.Pages[CompanyTab].PageVisible := True;
Notebook.PageIndex := CompanyTab;

When I trace this I find: (See my comments below)

procedure TOvcNotebook.SetPageIndex(Value : Integer);
Begin
...
{save previous page index}
OldIdx := FPageIndex;
// This call to IsValid returns true, Value=CompanyTab
if (Value <> FPageIndex) and IsValid(Value) then begin
...
// This call to IsValid returns False, Value=CompanyTab. Somehow the page
visible property changed to false.
if not IsValid(FPageIndex) then
raise EInvalidPageIndex.Create;
end;

I am using D4 Pro, O3.08

Please help.
Will.

[Sean Winstead[TurboPower]]

>I have a notebook with 7 Pages, the first 4 are always visible. I hide the
>pages that the user is not using and only show the pages when needed. The
>problem only occurs when I try to show one of the normally hidden pages.

> ...

>I am using D4 Pro, O3.08

I've read your post. This is one that I'll have to pass on to the main
Orpheus engineer when he is back in the office.

[Will]

Has anyone looked at this yet ?
Will.
"Sean Winstead[TurboPower]" <se...@turbopower.com> wrote in message
news:bosbqu8ji09bglvh3...@4ax.com...