ALLE standart-cursors ersetzen

[eyeless]

hallo,

ich habe auf meiner form sher viele unterschiedliche elemente.
nun möchte ich die standard-cursors mit meinen eigenen extra-für-dieses-programm-cursors erstzen .. ALLE

ich weis, wie (mit resourcen), funz auch alles prime.

ich wollte die so ersetzen:

Delphi-Quellcode:

Screen.Cursors[crHandPoint]:=LoadCursor(hInstance, 'CURHAND');
Screen.Cursors[crArrow]:=LoadCursor(hInstance, 'CURCUR');
Screen.Cursors[crHelp]:=LoadCursor(hInstance, 'CURHELP');
Screen.Cursors[crIBeam]:=LoadCursor(hInstance, 'CURBEAM');
//usw. ...

so gez aber nicht, nur, wenn ich nun nochmal extra alle im 'object inspector' von 'crDefault' auf das gewünschte umstelle ... ZU AUFWENDIG, für allem, das manche elemente für jeden status andere cursors haben (resize, drag, ...)

wie kann ich nun machen, dass ganz einfach ALLE ersetzt werden und auch bei 'crDefault' in einem edit beim CURBEAM und beim resizen mein CURRESIZE?

mal sehen, ob mir diesmal jemand helfen kann ...

mfg, eyeless

[Robert Marquardt]

Screen.Cursors in der Hilfe nachschlagen.

[eyeless]

aha ... genau so habe ich das gemacht ...

[eyeless]

Keiner einen anderen Vorschlag?

Geht also nicht, oder?

Ich habe auch verscuth, sie in der Resource der fertigen EXE auszutauschen, das sind aber nicht alle Cursors drinne ... werde wohl die von windows genommen ...

@Robert Marquardt: meinst damit, das ich die standart nicht erseltzen darf?

mfg, eyeless