We help IT Professionals succeed at work.

CheckBoxes as children of Tabbed Notebooks?

jodyl
jodyl asked
on
Medium Priority
448 Views
Last Modified: 2010-04-04
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
Comment
Watch Question

Commented:
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.

Not the solution you were looking for? Getting a personalized solution is easy.

Ask the Experts

Author

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.
Access more of Experts Exchange with a free account
Thanks for using Experts Exchange.

Create a free account to continue.

Limited access with a free account allows you to:

  • View three pieces of content (articles, solutions, posts, and videos)
  • Ask the experts questions (counted toward content limit)
  • Customize your dashboard and profile

*This site is protected by reCAPTCHA and the Google Privacy Policy and Terms of Service apply.

OR

Please enter a first name

Please enter a last name

8+ characters (letters, numbers, and a symbol)

By clicking, you agree to the Terms of Use and Privacy Policy.