...
Code Block |
---|
Member Map End Include('CML_UI_ListCheckbox.inc'),Once !include('CML_System_Diagnostics_Logger.inc'),once !dbg CML_System_Diagnostics_Logger CML_UI_ListCheckbox.Initialize procedure(long listFEQ) code self.ListFEQ = ListFeq self.ListFEQ{PROPLIST:Icon,1} = 1 self.ListFEQ{PROP:IconList,1} = '~CML_UnChecked.ico' self.ListFEQ{PROP:IconList,2} = '~CML_Checked.ico' self.ListFEQ{PROPLIST:Picture,1} = '@p p' pragma('link (CML_Checked.ico)') pragma('link (CML_UnChecked.ico)') |
Next time: Making the Initialize call more flexible, and turning checkboxes on and off.