Strecke, die die Maus zurücklegt messen

[glkgereon]

also wenn ich nur die strecke will, die der mauszeiger aufm bildschirm zurücklegt....da könnte ich ja Screen.PixelsPerInch nehmen...oder?

stimmen diese umrechnungssachen?

Delphi-Quellcode:

{ *** Umrechnen ***}

function Inch2MM(Val: Extended):Extended;
begin
  Result:=Val*25.4
end;

function MM2Inch(Val: Extended):Extended;
begin
  Result:=Val/25.4
end;

function Px2Inch(Val: Int64):Extended;
begin
  Result:=Val/Screen.PixelsPerInch;
end;

function Inch2Px(Val: Extended):Int64;
begin
  Result:=Round(Val*Screen.PixelsPerInch);
end;

function Px2MM(Val: Int64):Extended;
begin
  Result:=Inch2MM(Val/Screen.PixelsPerInch);
end;

function MM2Px(Val: Extended):Int64;
begin
  Result:=Round(MM2Inch(Val)*Screen.PixelsPerInch);
end;

{ *** Ende Umrechnen *** }