Difference between revisions of "Fontfixedpitch Property"

From Lianjapedia
Jump to: navigation, search
(Created page with '__NOTOC__ Whether the object's font is fixed pitch. Read/write. <pre> lFixedpitch = ob.fontfixedpitch ob.fontfixedpitch = bFixedpitch </pre> ===lFixedpitch=== Logical signifyi…')
 
(Example)
Line 66: Line 66:
 
textbox2.fontname = "Monospaced"
 
textbox2.fontname = "Monospaced"
 
textbox2.fontsize = 18
 
textbox2.fontsize = 18
 +
return page1_section1
 
</code>
 
</code>

Revision as of 07:51, 11 April 2011

Whether the object's font is fixed pitch. Read/write.

lFixedpitch = ob.fontfixedpitch
ob.fontfixedpitch = bFixedpitch

lFixedpitch

Logical signifying whether the font is fixed pitch or not:

True False
.T. .F.


bFixedpitch

Boolean to set the font to fixed pitch 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.fontfixedpitch = not textbox1.fontfixedpitch
		textbox2.fontfixedpitch = not textbox2.fontfixedpitch
	endproc
enddefine
 
proc page1_section1 
	page1_section1 = createobject("page1_section1")
 
	page1_section1.addobject("fontbutton","font_button")
	fontbutton.caption = "Toggle FixedPitch"	
 
	page1_section1.addobject("textbox1", "Textbox")
	textbox1.value = "Textbox 1"
	textbox1.fontname = "Monospaced"
	textbox1.fontsize = 18
	textbox1.fontfixedpitch = True
 
	page1_section1.addobject("textbox2", "Textbox")
	textbox2.value = "Textbox 2"
	textbox2.fontname = "Monospaced"
	textbox2.fontsize = 18
return page1_section1