<p style="padding:0 0 0 0; margin:0 0 0 0;">OK, thanks.</p>

<p style="padding:0 0 0 0; margin:0 0 0 0;">______________________________________________________________<br />
> Od: Ondrej Pokorny <lazarus@kluug.net><br />
> Komu: Lazarus mailing list <lazarus@lists.lazarus.freepascal.org><br />
> Datum: 22.05.2016 16:21<br />
> Předmět: Re: [Lazarus] Detect that component selected in OI.<br />
></p>

<div class="moz-cite-prefix">On 22.05.2016 14:13, Vojtěch Čihák wrote:</div>
<blockquote cite="mid:20160522141337.D710D9C4@atlas.cz">
<p style="padding: 0 0 0 0; margin: 0 0 0 0;">procedure TMyTabSheet.HookSelection(const ASelection: TPersistentSelectionList);</p>

<p style="padding: 0 0 0 0; margin: 0 0 0 0;">begin</p>

<p style="padding: 0 0 0 0; margin: 0 0 0 0;">  if assigned(FMyPageControl) and (ASelection.IndexOf(self)>=0) then</p>

<p style="padding: 0 0 0 0; margin: 0 0 0 0;">    FMyPageControl.TabIndex:= FMyPageControl.Pages.IndexOf(self);</p>

<p style="padding: 0 0 0 0; margin: 0 0 0 0;">end;   </p>

</blockquote>
<p style="padding:0 0 0 0; margin:0 0 0 0;">+ You also should check for selecting child controls (e.g. the user selects a button in the page). See TObjectInspectorDlg.DefSelectionVisibleInDesigner from r52344.</p>

<p style="padding:0 0 0 0; margin:0 0 0 0;">Ondrej</p>

<br />
 <br />
 ----------<br />
 <br />
 --<br />
 _______________________________________________<br />
 Lazarus mailing list<br />
 Lazarus@lists.lazarus.freepascal.org<br />
 <a href="http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus">http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus</a><br />