Source position: zglHeader.pas line 334
var mouse_Lock: procedure(
X: Integer = - 1;
Y: Integer = - 1
);