Fontname Property
From Lianjapedia
The name of the object's font. Read/write.
cFontName = ob.fontname ob.fontname = cFontName
cFontName
String signifying the font name.
Example
// // Lianja custom section for page "page1" section "section1" // namespace custom1 public textbox1 define class page1_section1 as section enddefine define class font_button as CommandButton proc click textbox1.fontname = "Dingbats" messagebox(textbox1.fontname,0,"Font") endproc enddefine proc page1_section1 page1_section1 = createobject("page1_section1") page1_section1.addobject("fontbutton","font_button") fontbutton.caption = "Change Font" page1_section1.addobject("textbox1", "Textbox") textbox1.value = "Textbox" textbox1.fontname = "Helvetica" return page1_section1