tguiapplication.calcmousewheeldelta

public procedure tguiapplication.calcmousewheeldelta(

  var info: mousewheeleventinfoty;

  const fmin: real;

  const fmax: real;

  const deltamin: real;

  const deltamax: real

);