Mercurial > hg > octave-max

diff scripts/plot/uimenu.m @ 11159:a06759adaa79

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Add demo for uimenu.m
author Kai Habel <kai.habel@gmx.de>
date Tue, 26 Oct 2010 19:36:19 +0200
parents f0e9befd6a1c
children 75ff3db6a687
line wrap: on
line diff
--- 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)");