Source position: mseact.pas line 340
procedure linktoaction(
const sender: iactionlink;
const aaction: tcustomaction;
var info: actioninfoty
);