Cursor ändern

wenn ich in VB mousepointer=99 angebe und dann einen anderen cursor mit mouseicon=test.cur zum beispiel lade, wird dieser immer in schwarz/weiß dargestellt obwohl er im original farbig ist. was mache ich falsch ???
bitte helft mir

Keine Ahnung warum das so ist … wenn Du aber ein .ICO als Cursor ladest, wird’s wieder bunt!!
greets from michL (vienna)

wenn ich in VB mousepointer=99 angebe und dann einen anderen
cursor mit mouseicon=test.cur zum beispiel lade, wird dieser
immer in schwarz/weiß dargestellt obwohl er im original farbig
ist. was mache ich falsch ???
bitte helft mir

hallo,

tip, versuchs mal mit ein farbigem icon, das funktioniert.
leider kannst du doert kein hotspot festlegen.
oder versuchst es man aus einer Resource zu laden.

oder als hilfe

Sub ShowCursor(ByVal hMod As Long, sCursor As String) ‘ Get cursor handle hResourceCur = LoadImage(hMod, sCursor, IMAGE_CURSOR, 0, 0, 0) If hResourceCur hNull Then ordPointerLast = MousePointer MousePointer = vbCustom MouseIcon = CursorToPicture(hResourceCur) ordResourceLast = RT_CURSOR Call DrawIconEx(pbResource.hDC, 0, 0, hResourceCur, _ 0, 0, 0, hNull, DI_NORMAL) end if:end sub

volker

[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]