Delphi-PRAXiS - Delphi Cursor Austauschen

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)

- Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)

- - Delphi Cursor Austauschen (https://www.delphipraxis.net/56153-cursor-austauschen.html)

Cursor Austauschen

Hi Folks,

in einem Projekt soll ein Mauscursor während der Laufzeit ausgetauscht werden. Mir schwebte vor, dies folgendermassen zu realisieren:

1. rc Datei erstellen (cursor_man BITMAP cursor_man.bmp)
Hier stellt sich mir die Frage als was ich den späteren Cursor deklarieren soll...Bitmap, crCursor, funtzt irgendwie alles nicht

2. res draus machen

3. res in Delphi einbinden

4. entsprechende Prozedur schreiben

Delphi-Quellcode:

			procedure TFDSC_Sim.CursorChange(Sender: TObject);

const

  crManCursor = 1;

begin

  Screen.Cursors[crManCursor]:= LoadCursor(HInstance, 'cursor_man');

  Screen.Cursor := crManCursor;

end;

5. Cursor sehen wenn Prozedur ausgeführt wird

6. Ärgern wenn gewünschter Cursor nicht erscheint

Vielen Dank schon mal an all jene, welche dafür verantwortlich sind, dass jemand es schafft, das zu machen, was er will -.-

Re: Cursor Austauschen

Hi. Vielleicht hilft dir der Thread hier weiter, da wird beschrieben, wie man einen Cursor aus einer Datei lädt.

Klick

Man liest sich, Stanlay :hi:

http://stanlay.st.funpic.de/dpsig.png

Re: Cursor Austauschen

Hmpf,

danke für den Link. Schon bedenklich, dass es zu viel verlangt sein könnte, auf die Idee zu kommen, für Cursoren (Cursori?!) die Dateiendung .cur zu benutzen.

Jetzt funtztz...

thx