Thanks. I think I will find that very useful. Stacey
> -----Original Message----- > From: Robert Martin [mailto:rob@;wildsoft.co.nz] > Sent: Friday, 1 November 2002 3:56 p.m. > To: Multiple recipients of list delphi > Subject: Re: Re: [DUG]: TPagecontrol ... disabling a particular page > > > 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; > > > Rob > > Software engineer > Wild Software Ltd > Ph 03 338-1407 > ----- Original Message ----- > From: "Stacey Verner" <[EMAIL PROTECTED]> > To: "Multiple recipients of list delphi" <[EMAIL PROTECTED]> > Sent: Friday, November 01, 2002 3:28 PM > Subject: RE: Re: [DUG]: TPagecontrol ... disabling a particular page > > > How do you tell which page you are changing to? > > Stacey > > > -----Original Message----- > > From: Robert Martin [mailto:rob@;wildsoft.co.nz] > > Sent: Friday, 1 November 2002 3:17 p.m. > > To: Multiple recipients of list delphi > > Subject: Re: [DUG]: TPagecontrol ... disabling a particular page > > > > > > By adding code to the OnChanging event you should be able > to stop the > > user selecting a particular page. > > > > Rob > > > > Software engineer > > Wild Software Ltd > > Ph 03 338-1407 > > ----- Original Message ----- > > From: "Stacey Verner" <[EMAIL PROTECTED]> > > To: "Multiple recipients of list delphi" <[EMAIL PROTECTED]> > > Sent: Friday, November 01, 2002 3:16 PM > > Subject: RE: [DUG]: TPagecontrol ... disabling a particular page > > > > > > TabSheet.Enabled := False is much like Panel.Enabled := False. You > > can't touch any of the controls, bot otherwise all else is > the same. > > To Tab to look disabled you have to do owner draw stuff, or look at > > third party controls. To make it so that the user can see, > but can't > > get to the disabled page is another story entirely. You > prabably have > > to look at third party controls to do that. > > > > Stacey > > > > > -----Original Message----- > > > From: James Low [mailto:James.Low@;bopdhb.govt.nz] > > > Sent: Friday, 1 November 2002 3:13 p.m. > > > To: Multiple recipients of list delphi > > > Subject: [DUG]: TPagecontrol ... disabling a particular page > > > > > > > > > > > > D5, Win 2000 Pro ... > > > > > > I have a form with a TPageControl (named TS). This has 6 > pages. For > > > some reason ts.Pages[4].Enabled := false appears to do absolutely > > > nothing. ts.Pages[4].Tabvisible, by contrast does as expected and > > > hides the troublesome page. I expect ts.Pages[4].Enabled > := false to > > > dim the page and prevent it becoming the activepage but perhaps I > > > expect too much?? > > > > > > Any thoughts before I dig a little deeper. > > > > > > Thanks > > > > > > > > > James > > > > > > Notice of Legal Status and Confidential Information: This > > electronic > > > mail message and any accompanying attachments may contain > > information > > > that is privileged and CONFIDENTIAL. If you are not the intended > > > recipient you are advised that any use, review, dissemination, > > > distribution or reproduction of the information is strictly > > prohibited > > > and may be unlawful. If you have received this document in error, > > > please notify the sender immediately and destroy the message. > > > -------------------------------------------------------------- > > > ------------- > > > 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/ > > > -------------------------------------------------------------- > ------------- > 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/
