Message Property

Text displayed in the statusbar when you hover over an object or the object has focus. Read/write.

cMessage = ob.message
ob.message = cMessage

cComment

String storing the text to be displayed.

Example

//
// Lianja custom section for page "page1" section "section1"
//
namespace custom1
public textbox1
define class page1_section1 as section
enddefine
 
define class message_button as CommandButton
	proc click
		messagebox(textbox1.message,0,"Message")
	endproc
enddefine
 
proc page1_section1 
	page1_section1 = createobject("page1_section1")
 
	page1_section1.addobject("messagebutton","message_button")
	messagebutton.caption = "Query Message"	
 
	page1_section1.addobject("textbox1", "Textbox")
	textbox1.value = "Textbox"
	textbox1.message = "This is the message"
return page1_section1