<html xmlns:v="urn:schemas-microsoft-com:vml" xmlns:o="urn:schemas-microsoft-com:office:office" xmlns:w="urn:schemas-microsoft-com:office:word" xmlns:x="urn:schemas-microsoft-com:office:excel" xmlns:st1="urn:schemas-microsoft-com:office:smarttags" xmlns="http://www.w3.org/TR/REC-html40"
xmlns:ns0="http://schemas.microsoft.com/office/2004/12/omml">
<head>
<meta http-equiv=Content-Type content="text/html; charset=us-ascii">
<meta name=Generator content="Microsoft Word 11 (filtered medium)">
<!--[if !mso]>
<style>
v\:* {behavior:url(#default#VML);}
o\:* {behavior:url(#default#VML);}
w\:* {behavior:url(#default#VML);}
.shape {behavior:url(#default#VML);}
</style>
<![endif]--><o:SmartTagType
namespaceuri="urn:schemas-microsoft-com:office:smarttags" name="place"/>
<!--[if !mso]>
<style>
st1\:*{behavior:url(#default#ieooui) }
</style>
<![endif]-->
<style>
<!--a:link
{mso-style-priority:99;}
span.MSOHYPERLINK
{mso-style-priority:99;}
a:visited
{mso-style-priority:99;}
span.MSOHYPERLINKFOLLOWED
{mso-style-priority:99;}
/* Font Definitions */
@font-face
{font-family:Tahoma;
panose-1:2 11 6 4 3 5 4 4 2 4;}
@font-face
{font-family:Calibri;}
/* Style Definitions */
p.MsoNormal, li.MsoNormal, div.MsoNormal
{margin:0cm;
margin-bottom:.0001pt;
font-size:12.0pt;
font-family:Calibri;}
a:link, span.MsoHyperlink
{color:blue;
text-decoration:underline;}
a:visited, span.MsoHyperlinkFollowed
{color:purple;
text-decoration:underline;}
span.EmailStyle17
{mso-style-type:personal;
font-family:Calibri;
color:windowtext;}
span.EmailStyle18
{mso-style-type:personal;
font-family:Calibri;
color:#1F497D;}
span.EmailStyle19
{mso-style-type:personal;
font-family:Calibri;
color:#1F497D;}
span.EmailStyle20
{mso-style-type:personal-reply;
font-family:Arial;
color:navy;}
@page Section1
{size:612.0pt 792.0pt;
margin:72.0pt 72.0pt 72.0pt 72.0pt;}
div.Section1
{page:Section1;}
-->
</style>
<!--[if gte mso 9]><xml>
<o:shapedefaults v:ext="edit" spidmax="1026" />
</xml><![endif]--><!--[if gte mso 9]><xml>
<o:shapelayout v:ext="edit">
<o:idmap v:ext="edit" data="1" />
</o:shapelayout></xml><![endif]-->
</head>
<body lang=EN-US link=blue vlink=purple>
<div class=Section1>
<p class=MsoNormal><font size=2 color=navy face=Arial><span style='font-size:
10.0pt;font-family:Arial;color:navy'>Ross,<o:p></o:p></span></font></p>
<p class=MsoNormal><font size=2 color=navy face=Arial><span style='font-size:
10.0pt;font-family:Arial;color:navy'> Each page in the page control is a
TTabsheet, and each TTabsheet has a TabVisible property.<o:p></o:p></span></font></p>
<p class=MsoNormal><font size=2 color=navy face=Arial><span style='font-size:
10.0pt;font-family:Arial;color:navy'><o:p> </o:p></span></font></p>
<p class=MsoNormal><font size=2 color=navy face=Arial><span style='font-size:
10.0pt;font-family:Arial;color:navy'> You could also try creating Frames
that end up displaying what you want, making the need to be able to fiddle with
each of the pages unnecessary in the IDE. Deal with each frame individually
and plop them into the PageControl at runtime. <o:p></o:p></span></font></p>
<p class=MsoNormal><font size=2 color=navy face=Arial><span style='font-size:
10.0pt;font-family:Arial;color:navy'><o:p> </o:p></span></font></p>
<p class=MsoNormal><font size=2 color=navy face=Arial><span style='font-size:
10.0pt;font-family:Arial;color:navy'> You can also make your buttons +
panels thing work in the IDE if you create, compile and install a new component
which just wraps them all together.<o:p></o:p></span></font></p>
<p class=MsoNormal><font size=2 color=navy face=Arial><span style='font-size:
10.0pt;font-family:Arial;color:navy'><o:p> </o:p></span></font></p>
<p class=MsoNormal><font size=2 color=navy face=Arial><span style='font-size:
10.0pt;font-family:Arial;color:navy'> Having said that, are you sure that
this is really what you want to do?<o:p></o:p></span></font></p>
<p class=MsoNormal><font size=2 color=navy face=Arial><span style='font-size:
10.0pt;font-family:Arial;color:navy'><o:p> </o:p></span></font></p>
<p class=MsoNormal><font size=2 color=navy face=Arial><span style='font-size:
10.0pt;font-family:Arial;color:navy'> If your PageControl is getting unwieldy
in the IDE, how understandable is it going to be for your poor confused users?
<o:p></o:p></span></font></p>
<p class=MsoNormal><font size=2 color=navy face=Arial><span style='font-size:
10.0pt;font-family:Arial;color:navy'><o:p> </o:p></span></font></p>
<p class=MsoNormal><font size=2 color=navy face=Arial><span style='font-size:
10.0pt;font-family:Arial;color:navy'>Trevor<o:p></o:p></span></font></p>
<p class=MsoNormal><font size=2 color=navy face=Arial><span style='font-size:
10.0pt;font-family:Arial;color:navy'><o:p> </o:p></span></font></p>
<div>
<div class=MsoNormal align=center style='text-align:center'><font size=3
face="Times New Roman"><span style='font-size:12.0pt;font-family:"Times New Roman"'>
<hr size=2 width="100%" align=center tabindex=-1>
</span></font></div>
<p class=MsoNormal><b><font size=2 face=Tahoma><span style='font-size:10.0pt;
font-family:Tahoma;font-weight:bold'>From:</span></font></b><font size=2
face=Tahoma><span style='font-size:10.0pt;font-family:Tahoma'>
delphi-bounces@listserver.123.net.nz
[mailto:delphi-bounces@listserver.123.net.nz] <b><span style='font-weight:bold'>On
Behalf Of </span></b>Ross Levis<br>
<b><span style='font-weight:bold'>Sent:</span></b> Friday, 4 January 2008 1:43
p.m.<br>
<b><span style='font-weight:bold'>To:</span></b> 'NZ Borland Developers Group -
<st1:place w:st="on">Delphi</st1:place> List'<br>
<b><span style='font-weight:bold'>Subject:</span></b> RE: [DUG] BringToFront at
Design time</span></font><font face="Times New Roman"><span style='font-family:
"Times New Roman"'><o:p></o:p></span></font></p>
</div>
<p class=MsoNormal><font size=3 face=Calibri><span style='font-size:12.0pt'><o:p> </o:p></span></font></p>
<p class=MsoNormal><font size=3 color="#1f497d" face=Calibri><span lang=EN-NZ
style='font-size:12.0pt;color:#1F497D'>I thought of that too but when I looked
for a property to make the tabs invisible, I couldn’t find one. I’m
using D7. I’m probably missing something obvious. Can you
please enlighten me.<o:p></o:p></span></font></p>
<p class=MsoNormal><font size=3 color="#1f497d" face=Calibri><span lang=EN-NZ
style='font-size:12.0pt;color:#1F497D'><o:p> </o:p></span></font></p>
<p class=MsoNormal><font size=3 color="#1f497d" face=Calibri><span lang=EN-NZ
style='font-size:12.0pt;color:#1F497D'>Thanks,<o:p></o:p></span></font></p>
<p class=MsoNormal><font size=3 color="#1f497d" face=Calibri><span lang=EN-NZ
style='font-size:12.0pt;color:#1F497D'>Ross.<o:p></o:p></span></font></p>
<p class=MsoNormal><font size=3 color="#1f497d" face=Calibri><span lang=EN-NZ
style='font-size:12.0pt;color:#1F497D'><o:p> </o:p></span></font></p>
<div>
<div style='border:none;border-top:solid #B5C4DF 1.0pt;padding:3.0pt 0cm 0cm 0cm'>
<p class=MsoNormal><b><font size=2 face=Tahoma><span style='font-size:10.0pt;
font-family:Tahoma;font-weight:bold'>From:</span></font></b><font size=2
face=Tahoma><span style='font-size:10.0pt;font-family:Tahoma'>
delphi-bounces@listserver.123.net.nz
[mailto:delphi-bounces@listserver.123.net.nz] <b><span style='font-weight:bold'>On
Behalf Of </span></b>Myles Penlington<br>
<b><span style='font-weight:bold'>Sent:</span></b> Friday, 4 January 2008 12:27
p.m.<br>
<b><span style='font-weight:bold'>To:</span></b> NZ Borland Developers Group - <st1:place
w:st="on">Delphi</st1:place> List<br>
<b><span style='font-weight:bold'>Subject:</span></b> RE: [DUG] BringToFront at
Design time<o:p></o:p></span></font></p>
</div>
</div>
<p class=MsoNormal><font size=3 face=Calibri><span lang=EN-NZ style='font-size:
12.0pt'><o:p> </o:p></span></font></p>
<p class=MsoNormal><font size=2 color="#1f497d" face=Calibri><span lang=EN-NZ
style='font-size:11.0pt;color:#1F497D'>Nope.<o:p></o:p></span></font></p>
<p class=MsoNormal><font size=2 color="#1f497d" face=Calibri><span lang=EN-NZ
style='font-size:11.0pt;color:#1F497D'><o:p> </o:p></span></font></p>
<p class=MsoNormal><font size=2 color="#1f497d" face=Calibri><span lang=EN-NZ
style='font-size:11.0pt;color:#1F497D'>You can keep the page control (or use
the windows 3.1 notebook control) . Just make the tabs invisible (it is a
property), and then use whatever control you like to select the page to
display. Then it works at design and runtime.<o:p></o:p></span></font></p>
<p class=MsoNormal><font size=2 color="#1f497d" face=Calibri><span lang=EN-NZ
style='font-size:11.0pt;color:#1F497D'><o:p> </o:p></span></font></p>
<p class=MsoNormal><font size=2 color="#1f497d" face=Calibri><span lang=EN-NZ
style='font-size:11.0pt;color:#1F497D'>Myles.<o:p></o:p></span></font></p>
<p class=MsoNormal><font size=2 color="#1f497d" face=Calibri><span lang=EN-NZ
style='font-size:11.0pt;color:#1F497D'><o:p> </o:p></span></font></p>
<div>
<div style='border:none;border-top:solid #B5C4DF 1.0pt;padding:3.0pt 0cm 0cm 0cm'>
<p class=MsoNormal><b><font size=2 face=Tahoma><span style='font-size:10.0pt;
font-family:Tahoma;font-weight:bold'>From:</span></font></b><font size=2
face=Tahoma><span style='font-size:10.0pt;font-family:Tahoma'> delphi-bounces@listserver.123.net.nz
[mailto:delphi-bounces@listserver.123.net.nz] <b><span style='font-weight:bold'>On
Behalf Of </span></b>Ross Levis<br>
<b><span style='font-weight:bold'>Sent:</span></b> Friday, 4 January 2008 12:19
p.m.<br>
<b><span style='font-weight:bold'>To:</span></b> 'NZ Borland Developers Group -
<st1:place w:st="on">Delphi</st1:place> List'<br>
<b><span style='font-weight:bold'>Subject:</span></b> [DUG] BringToFront at
Design time<o:p></o:p></span></font></p>
</div>
</div>
<p class=MsoNormal><font size=3 face=Calibri><span lang=EN-NZ style='font-size:
12.0pt'><o:p> </o:p></span></font></p>
<p class=MsoNormal><font size=3 face=Calibri><span lang=EN-NZ style='font-size:
12.0pt'>A PageControl I’ve been using to set configuration settings has
too many tabs on it now. I’ve decided to change to a list of
buttons down the left side and a series of TPanels on the right occupying the
same space. Clicking a button sets one panel to Visible and the previous
one invisible.<o:p></o:p></span></font></p>
<p class=MsoNormal><font size=3 face=Calibri><span lang=EN-NZ style='font-size:
12.0pt'><o:p> </o:p></span></font></p>
<p class=MsoNormal><font size=3 face=Calibri><span lang=EN-NZ style='font-size:
12.0pt'>This works well at run time but not in the IDE. I would like the
same to occur at design time so I can access each panel easily like I could
clicking a tab in a PageControl.<o:p></o:p></span></font></p>
<p class=MsoNormal><font size=3 face=Calibri><span lang=EN-NZ style='font-size:
12.0pt'><o:p> </o:p></span></font></p>
<p class=MsoNormal><font size=3 face=Calibri><span lang=EN-NZ style='font-size:
12.0pt'>Is this possible? I tried using BringToFront in the code but that
didn’t help.<o:p></o:p></span></font></p>
<p class=MsoNormal><font size=3 face=Calibri><span lang=EN-NZ style='font-size:
12.0pt'><o:p> </o:p></span></font></p>
<p class=MsoNormal><font size=3 face=Calibri><span lang=EN-NZ style='font-size:
12.0pt'>Thanks,<o:p></o:p></span></font></p>
<p class=MsoNormal><font size=3 face=Calibri><span lang=EN-NZ style='font-size:
12.0pt'>Ross.</span></font><font face="Times New Roman"><span lang=EN-NZ
style='font-family:"Times New Roman"'><o:p></o:p></span></font></p>
</div>
</body>
</html>