Fontstrikethru Property
From Lianjapedia
Revision as of 07:27, 11 April 2011 by Yvonne.milne (Talk | contribs)
Whether the object's font is strikethru. Read/write.
lStrikethru = ob.fontstrikethru ob.fontstrikethru= bStrikethru
lStrikethru
Logical signifying whether the font is strikethru or not:
True | False |
---|---|
.T. | .F. |
bStrikethru
Boolean to set the font to strikethru or not:
True | False |
---|---|
True | False |
.T. | .F. |
1 | 0 |
Example
// // Lianja custom section for page "page1" section "section1" // namespace custom1 public textbox1, textbox2 define class page1_section1 as section enddefine define class font_button as CommandButton proc click textbox1.fontstrikethru = not textbox1.fontstrikethru textbox2.fontstrikethru = not textbox2.fontstrikethru endproc enddefine proc page1_section1 page1_section1 = createobject("page1_section1") page1_section1.addobject("fontbutton","font_button") fontbutton.caption = "Toggle Strikethru" page1_section1.addobject("textbox1", "Textbox") textbox1.value = "Textbox 1" textbox1.fontstrikethru = True page1_section1.addobject("textbox2", "Textbox") textbox2.value = "Textbox 2" return page1_section1