Eigene Cursor in Delphi laden oder ersetzen
Bestehenden Delphi-Cursor, z.B. Hand durch eigene Grafik ersetzen:
- Hand.res mit dem Delphi-Bildeditor anlegen, darin eine Cursor-Resource anlegen.
- Resource in der Unit, in der sie angesprochen wird, hinzufügen:
{$R 'Hand.res'} - Bestehenden Cursor ersetzen:
Screen.Cursors[crHandPoint] := LoadCursor(HInstance, makeIntResource(13));Screen.Cursors[crHandPoint] :=LoadCursor(HInstance,'HANDPOINT');
Kommentare
Kommentar veröffentlichen