Pascal Scripting: ScaleY

Prototype:

function ScaleY(Y: Integer): Integer;

Description:

Takes a Y coordinate or height and returns it scaled to fit the size of the current dialog font. If the dialog font is 8-point MS Sans Serif and the user is running Windows in Small Fonts (96 dpi), then Y is returned unchanged.