Difference between revisions of "TTICheckListBox"
From Free Pascal wiki
Jump to navigationJump to search (Created page with "For editing set of enumerated types. type TMonth = (Jan, Feb, Mar, Apr, May, Jun, Jul, Aug, Sep, Oct, Nov, Dec); TMonths = set of TMonth; TForm1 = class...") |
|||
Line 1: | Line 1: | ||
− | For editing set of enumerated types. | + | For editing set of enumerated types. Let's assume that you have following definitions. |
type | type |
Revision as of 10:40, 1 April 2022
For editing set of enumerated types. Let's assume that you have following definitions.
type TMonth = (Jan, Feb, Mar, Apr, May, Jun, Jul, Aug, Sep, Oct, Nov, Dec); TMonths = set of TMonth; TForm1 = class(TForm) private FMonths: TMonths; published property Months: TMonths read FMonths write FMonths; end;
You can use TTICheckListBox in following way.
with TICheckListBox1.LInk do begin TIObject:= Form1; TIPropertyName := 'Months'; end;