Aktuellen Mauszeiger Abfragen..

[Mavarik]

Hallo Zusammen!

Gibt es den keine Möglichkeit den aktuellen Mauszeiger abzufragen...

Und zwar nicht das Icon sondern das ID...

Ich möchte einfach nur wissen: Aktueller Mauszeiger ist z.b. : crHandPoint

Von mir aus auch das Windows ID : IDC_HAND

Nochmal nicht sowas..:

Delphi-Quellcode:

  procedure DrawCursor(ScreenShotBitmap : TBitmap);
  var
    r: TRect;
    CI: TCursorInfo;
    Icon: TIcon;
    II: TIconInfo;
  begin
    CI.cbSize := SizeOf(CI);
    if GetCursorInfo(CI) then
      if CI.Flags = CURSOR_SHOWING then
      begin
        r := ScreenShotBitmap.Canvas.ClipRect;
        Icon := TIcon.Create;
        try
          Icon.Handle := CopyIcon(CI.hCursor);
          if GetIconInfo(Icon.Handle, II) then
          begin
            ScreenShotBitmap.Canvas.Draw(
                  ci.ptScreenPos.x - Integer(II.xHotspot) - r.Left,
                  ci.ptScreenPos.y - Integer(II.yHotspot) - r.Top,
                  Icon
                  );
          end;
        finally
          Icon.Free;
        end;
      end;
   end;

Mavarik