Thema: Ocr_hand

Einzelnen Beitrag anzeigen

Satyr

Registriert seit: 8. Feb 2012
Ort: Essen
305 Beiträge
 
Delphi 10.4 Sydney
 
#1

Ocr_hand

  Alt 29. Sep 2012, 16:06
Huhu,

ich wechsele für mein Programm grade zur Laufzeit einige Cursor aus. Klappt im Grunde auch Prima. Nur nicht bei OCR_HAND. Laut Google Suche verwendet Delphi bei diesem einen Cursor nicht den Windows Standard sondern einen eigenen, weshalb ich diesen nicht tauschen kann.
Ich hab viele Beispiele gefunden wie ich den Windows Standard Cursor einbinden kann, nicht aber wie meinen eigenen.
Mein Code zum Cursorwechsel ist:

Delphi-Quellcode:
[..]
  hp:=LoadImage(0, PChar(ExtractFilePath(Application.Exename) + '..\img\cursor\pointer.cur'), IMAGE_CURSOR, 0, 0, LR_DEFAULTSIZE or LR_LOADFROMFILE);
  if hp=0 then ShowMessage('Pointer Cursor not found')
  else begin
    Screen.Cursors[3]:=hp;
  end;
[..]

SetSystemCursor(Screen.Cursors[3],OCR_HAND);
Wie gesagt, funktioniert bei allen Cursorn außer OCR_HAND. Was muss ich ändern damit das auch da geht?

Gruß,
Andreas
  Mit Zitat antworten Zitat