Source position: mseact.pas line 402
procedure actionstatestoshapestates(
const source: actioninfoty;
var dest: shapestatesty
);