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