Mercurial > hg > octave-nkf
changeset 11159:a06759adaa79
Add demo for uimenu.m
author | Kai Habel <kai.habel@gmx.de> |
---|---|
date | Tue, 26 Oct 2010 19:36:19 +0200 |
parents | 1795fe0ea004 |
children | 131d56b6d9a3 |
files | scripts/ChangeLog scripts/plot/uimenu.m |
diffstat | 2 files changed, 13 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/scripts/ChangeLog +++ b/scripts/ChangeLog @@ -1,3 +1,7 @@ +2010-10-26 Kai Habel <kai.habel@gmx.de> + + * plot/uimenu.m: Add simple demo + 2010-10-25 David Bateman <dbateman@free.fr> * statistics/distributions/discrete_pdf.m: Sort values before calling
--- a/scripts/plot/uimenu.m +++ b/scripts/plot/uimenu.m @@ -104,3 +104,12 @@ endif endfunction + +%!demo +%! surfl(peaks); +%! colormap(copper); +%! shading("interp"); +%! f = uimenu("label", "&File", "accelerator", "f"); +%! e = uimenu("label", "&Edit", "accelerator", "e"); +%! uimenu(f, "label", "Close", "accelerator", "q", "callback", "close (gcf)"); +%! uimenu(e, "label", "Toggle &Grid", "accelerator", "g", "callback", "grid (gca)");