Thema: Delphi Handcursorgrafik

Einzelnen Beitrag anzeigen

blackdrake

Registriert seit: 22. Aug 2003
Ort: Bammental
618 Beiträge
 
Delphi 10.3 Rio
 
#7

Re: Handcursorgrafik

  Alt 27. Aug 2008, 12:46
Hallo.

Entschuldigt bitte, dass ich das Thema wieder hochhole. Ich habe das selbe Problem, möchte jedoch den Hand-Cursor NICHT "hard-coden". Wenn sich der Benutzer entschließt, in der Systemsteuerung unter "Maus" -> "Zeiger" -> "Verknüpfungsauswahl" z.B. einen Hundehaufen als Hand-Zeiger einzustellen, dann ist es ja irgendwie unpassend, wenn die Standardhand in der Delphi-Applikation erscheint. Außerdem hat Vista ja z.B. auch bei etwas genauerem Hinschauen einen etwas anderen Handcursor. Ich habe schon lange gesucht, aber nie einen Codeteil gefunden, der es erlaubt, den richtigen Hand-Cursor von Windows zu beziehen.

Dafür muss es doch eine API-Funktion geben, oder nicht?

Und wenn es keine API-Funktion geben sollte, müsste man doch trotzdem über die Registry und den Dateipfad an den aktuell gültigen Handcursor kommen.

In Visual Basic 6 musste man hierfür folgendes machen:

Code:
Private Sub Link1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
  Dim lHandle As Long
  lHandle = LoadCursor(0, HandCursor)
  If (lHandle > 0) Then SetCursor lHandle
End Sub
(Ich weiß hier aber nicht genau, ob das auch eine Art harte Kodierung ist)

Gruß
blackdrake
Daniel Marschall
  Mit Zitat antworten Zitat