[Webinar] Streamline your web hosting managementRegister Today

x
  • Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 433
  • Last Modified:

CheckBoxes as children of Tabbed Notebooks?

This is in Delphi 1.0

I have a tabbed notebook with multiple check boxes on each page.  Is there a way to access these check box controls as children of the notebook (like you can do with controls in a group box)?  I want to be able to set the Checked property of all of the checkboxes to true or false without having to access each one by it's name.  I can't find any reference to doing it with tabbed notebooks.

Jody
0
jodyl
Asked:
jodyl
1 Solution
 
sperlingCommented:
procedure SetCheckboxes (ANotebook : TTabbedNotebook; APage : INTEGER; Checked : BOOLEAN);
var
  ndx     : INTEGER;
begin
  with TTabPage(ANotebook.Pages.Objects[APage]) do begin
    for ndx :=  0 to ControlCOunt-1 do begin
      if Controls[ndx] is TCheckBox then TCheckBox(Controls[ndx]).Checked := Checked;
    end;
  end;
end;


Use this proc... The APage parameter is 0-base page index.

Regards,

Erik.
0
 
jodylAuthor Commented:
It ain't documented as far as I know.

I once needed to find out how to create a control run-time, and place it on a given notebook page, therefore I just looked through the VCL source.


Regards,

Erik.
0

Featured Post

Receive 1:1 tech help

Solve your biggest tech problems alongside global tech experts with 1:1 help.

Tackle projects and never again get stuck behind a technical roadblock.
Join Now