2010-07-16 20:45

/*
GUIBEGIN
WINDOW , 88, 223, 175, 60, POPUP|CAPTION|SYSMENU|MINBOX|MAXBOX|THICK
	FONT 8, 400, MS Shell Dlg
	PUSH 66, 41, 40, 14, TABSTOP, , Cancel, ESCAPE, Cancel
	TEXT 3, 2, 169, 36, GROUP, , MyText, , Text
DEND
GUIEND
*/

create:
	guierr = "SYNTAX"
	guiheading = 1
	guicreatewindow("NORMAL", -1)
	guiaddctltext(,	ARG(1))
	RETURN

destroy:
	guidestroywindow()
	RETURN

/* Called by Reginald when the user clicks on our "Cancel" button */
wm_click_cancel:
	/* Set the GuiSignal variable (in whatever script calls GuiGetMsg) to "ABORT" */
	guiwake("ABORT")
	RETURN

/* This function can be called by my creator to set the TEXT control in my window */
showmessage:
	guiaddctltext("MyText", ARG(1))
	RETURN	

2010-07-16 20:45