System Cursor austauschen

[Satyr]

Das heisst ich kann meinen eigenen Cursor nicht einfach per ID setzen? Ich fand das ganz praktisch, weil ich ihn nicht per res laden wollte sollte ein wenig (datei-)austauschbarer.
Nur habe ich da nichts gefunden, wie das ohne ID geht (kann natürlich an fehlendem Wissen meinerseits liegen).

[DeddyH]

Ich habe so etwas noch nie versucht, aber wenn ich das richtig verstehe, benötigst Du zunächst eine Kopie des Originalcursors. Klappt es so?

Delphi-Quellcode:

CurSysCursor := GetCursor;
OldCursor := CopyCursor(CurSysCursor);

Und am Ende dann OldCursor statt CurSysCursor zuweisen. Diese Angaben sind allerdings ohne Gewähr. Übrigens sollte man wohl noch die entsprechenden Rückgabewerte auswerten.

[Satyr]

Wieso eine Kopie? CurSysCursor ist doch schon quasi eine Kopie, sobald es mit dem aktuellen Cursor gefüllt wird?

[DeddyH]

Hast Du meinen Vorschlag einmal ausprobiert?

[Satyr]

Ich bin grad unterwegs vom Büro nach Hause. Gib mir 20 Minuten, dann teste ich.
Als welchen Typ soll ich denn die OldCursor Variable definieren?

[DeddyH]

Als hCursor. Nach weiterer Überlegung sollte es aber genügen, nur die erste Zeile abzuändern:
CurSysCursor := CopyCursor(GetSysCursor); Sofern ich Recht habe, wird damit eine Kopie des Cursors in einem anderen Speicherbereich angelegt und somit nicht überschrieben.

[Satyr]

[DCC Fehler] Unit1.pas(478): E2003 Undefinierter Bezeichner: 'CopyCursor'

Das scheint nicht (mehr) in der Windows.pas zu stehen...