Source position: mseshapes.pas line 114
procedure drawmenubutton(
const canvas: tcanvas;
var info: shapeinfoty;
const innerframe: pframety = Nil
);