Hallo,

ich zeige ein Programm mit der üblichen Bedienoberfläche TButton, TScrollbar, TPaintbox usw. in einer Präsentation im Rahmen eines Vortrages. Der Standardcursor ist für die Zuschauer schwer auffindbar. Der Laserpointer aus Powerpoint ist viel deutlicher. (Für die, die den nicht kennen, Bild im Anhang.) So einen Cursor habe ich in einer Resource verpackt und lade daraus den Cursor zur Laufzeit, funktioniert.

Unschönheit: Ich muss den Cursor außer für das Form auch für jede enthaltene Komponente einzeln setzen. Ich bin sicher, bei der nächsten Ergänzung um einen TButton vergesse ich, dass der auch in der Cursor-Procedure verdrahtet werden muss.

Hat jemand eine Idee, wie das besser geht?

Gruß
GuaAck

Hilft Dir evtl. weiter:

statt

?

Moderiert von Th69: Delphi-Tags hinzugefügt

Bingo!!!! So geht es, Danke,
Gruß
GuaAck