In that case you would also have to trap the key press and test to see if the next (or previous) tab is the one that is disabled.
Rob Software engineer Wild Software Ltd Ph 03 338-1407 ----- Original Message ----- From: "Robert Martin" <[EMAIL PROTECTED]> To: "Multiple recipients of list delphi" <[EMAIL PROTECTED]> Sent: Monday, November 04, 2002 9:06 AM Subject: Re: [DUG]: TPagecontrol ... disabling a particular page > True > Rob > > Software engineer > Wild Software Ltd > Ph 03 338-1407 > ----- Original Message ----- > From: "Ross Levis" <[EMAIL PROTECTED]> > To: "Multiple recipients of list delphi" <[EMAIL PROTECTED]> > Sent: Sunday, November 03, 2002 7:14 PM > Subject: Re: [DUG]: TPagecontrol ... disabling a particular page > > > > That won't work when using the left/right arrow keys on the keyboard to > > change the tab, which some people use. > > > > Ross. > > > > -- Original Message -- > > > > The following does it, I think there is a better way but cant > > remember what it was. > > > > //Stops selection of page 2 > > var > > pt : TPoint; > > begin > > pt := ScreenToClient(Mouse.CursorPos); > > if (PageControl.IndexOfTabAt(pt.X, pt.Y) = 2) then begin > > AllowChange := False; > > end; > > > > > > > > > > -------------------------------------------------------------------------- > - > > New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED] > > Website: http://www.delphi.org.nz > > To UnSub, send email to: [EMAIL PROTECTED] > > with body of "unsubscribe delphi" > > Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/ > > > > > -------------------------------------------------------------------------- - > New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED] > Website: http://www.delphi.org.nz > To UnSub, send email to: [EMAIL PROTECTED] > with body of "unsubscribe delphi" > Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/ > --------------------------------------------------------------------------- New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED] Website: http://www.delphi.org.nz To UnSub, send email to: [EMAIL PROTECTED] with body of "unsubscribe delphi" Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/
