Source position: mseshapes.pas line 112
procedure drawtoolbutton(
const canvas: tcanvas;
var info: shapeinfoty
);