Source position: mseshapes.pas line 121
procedure drawbutton(
const canvas: tcanvas;
const info: shapeinfoty
);