[Lazarus] Converting from TNotebook to TPageControl

Mark Morgan Lloyd markMLl.lazarus at telemetry.co.uk
Sun Apr 24 14:33:06 CEST 2011

I'm belatedly fixing a couple of projects that I find refer to TNotebook.

Using TNotebook, one can insert and delete pages on the fly using code like

   WITH Hp495xSpoofForm.Notebook1) DO BEGIN
     Pages.Insert(i, 'Port ' + IntToStr(i + 1));


Is there an "approved" way to do this with TPageControl? I see from the 
online info that one can cast to a TCustomNotebook to access .Pages as a 
TStrings, but is this safe in the long term or will TCustomNotebook go 
the way of TNotebook?

I notice that 
has  property Pages: TTabSheet;  while the comctrls.pas has  property 
Pages[Index: Integer]:  etc. Doesn't help much.

Mark Morgan Lloyd
markMLl .AT. telemetry.co .DOT. uk

[Opinions above are the author's, not those of his employers or colleagues]

More information about the Lazarus mailing list