Lepidosteus a écrit :
If you find no clean way of doing it, using OnChange to set back the
page the user should watch should be okay.
I know it's not a clean way, but it at least it's working.
Thanks but I cannot use this. Two of the pages of the TPageControl
are dialog boxes that are initialized when opening a page [*], so the
program would re-initialize a dialog box while it is showing the
progress of a running task (this is even worst than that, some global
variables are also re-initialized).
[*] A snapshot of Primo - compiled with Delphi 5 under Win98 - can be
seen at http://www.ellipsa.net/primo/index.html )
Yesterday, I had a glance on the Lazarus source and I don't understand
why setting AllowChange to false doesn't lock the TPageControl. It
inherits from TCustomNoteBook and TCustomNoteBook.CanChangePageIndex
calls OnChanging (when assigned, of course). Maybe a mouse click on a
tab is such that CanChangePageIndex is never called (?)
mm
_________________________________________________________________
To unsubscribe: mail [EMAIL PROTECTED] with
"unsubscribe" as the Subject
archives at http://www.lazarus.freepascal.org/mailarchives