On Sat, 1 Apr 2006 04:06:57 +0000 (GMT)
Júnior Gonçalves <[EMAIL PROTECTED]> wrote:
> Patch to Issue 0001903:
> In customnotebook.inc, procedure ShowCurrentPage:
>
> procedure TCustomNotebook.ShowCurrentPage;
> begin
> if (FPageIndex >= 0) and (FPageIndex < PageCount) then
> begin
> Page[FPageIndex].Visible := true;
> If IsVisible=True then SetFocus;
> end;
> end;
ShowCurrentPage is called during handle creation, by setting PageIndex,
inserting a page, ... . It should not be focused everytime.
Maybe we should define, when a TPage should be focused automatically.
Mattias
_________________________________________________________________
To unsubscribe: mail [EMAIL PROTECTED] with
"unsubscribe" as the Subject
archives at http://www.lazarus.freepascal.org/mailarchives
