Keskustelu: Koodit: Pascal: Animoitu kursori omassa delphi ohjelmassa

const
  cnCursorID1 = 1;
begin
  Screen.Cursors[ cnCursorID1 ] :=
    LoadCursorFromFile(
      'c:\kursorin\hakemisto\nimi.ani' );
  Cursor := cnCursorID1;
end;