Source position: mseobjectpicker.pas line 89
public procedure tobjectpicker.dobeforepaint(
const acanvas: tcanvas
);