Hallo,
ich versuche seit ca. 6 stunden einen Cursor per Resource inzubinden. Das will aber einfach nicht klappen.
Hier mal der Code:
Datei.rc
Code:
test123 ANICURSOR "cursor.ani"
Quellcode
Delphi-Quellcode:
{$R Datei.RES}
...
procedure TForm5.Button1Click(Sender: TObject);
Const crMyCursor = 4711;
begin
Screen.Cursors[crMyCursor] := LoadCursor(hInstance,'test123');
Screen.cursor:=crMyCursor;
end;
Wenn ich auf Button1 kliccke passiert garnichts.
Woran könnte das liegen???