On Thu, 18 Sep 2008 02:53:09 +0200, Ivan Benttini
Post by Ivan BenttiniDear People,
Can anyone help me to find [ minimenu.mnu ], look inside
of Ken's helpful dUFLP-V but could not find it.
Please help...
Ivan Benttini
I found the code below in my dUFLP directory. It is not in the latest
dUFLP zip file so it must have been "left over" from a previous issue.
Mervyn.
***** Start of minimenu.mnu ********
** END HEADER -- do not remove this line
//
// Generated on 2008/08/17
//
parameter formObj
new minimenuMENU(formObj, "root")
class minimenuMENU(formObj, name) of MENUBAR(formObj, name)
this.FILE = new MENU(this)
with (this.FILE)
text = "&File"
endwith
this.FILE.EXIT = new MENU(this.FILE)
with (this.FILE.EXIT)
onClick = class::EXIT_ONCLICK
text = "&Exit"
endwith
this.HELP = new MENU(this)
with (this.HELP)
text = "&Help"
endwith
this.HELP.CONTENTS = new MENU(this.HELP)
with (this.HELP.CONTENTS)
onClick = class::CONTENTS_ONCLICK
text = "&Contents"
endwith
function CONTENTS_onClick
do _pdfreader.wfm
return
function EXIT_onClick
this.parent.parent.parent.close()
return
endclass
******* End of minimenu.mnu ******