DelphiFAQ Home Search:

How to use an animated cursor to your application

 

comments1 comments. Current rating: 5 stars (1 votes). Leave comments and/ or rate it.

Using animated cursors in your application is very easy.

Here's an example:

(mycursor.ani is an animated cursor file. You can create those with Microsoft's aniedit.exe)

// John F. Goyvaerts
const
  crMyCursor = 1;
procedure TForm1.FormCreate(Sender: TObject);
begin
  // Load the cursor. Needs to be done only once
  Screen.Cursors[crMyCursor] := LoadCursorFromFile('c:\mystuff\mycursor.ani');
  // Use the cursor with this form
  Cursor := crMyCursor;
end;

Comments:

2007-05-06, 11:15:34
anonymous from Ljubljana, Slovenia  
rating
very helpful

 

 

Email address (not necessary):

Rate as
Hide my email when showing my comment.
Please notify me once a day about new comments on this topic.
Please provide a valid email address if you select this option.
 
It seems that you are
from Washington, US .

Info/ Feedback on this

Show city and country
Show country only
Hide my location
You can mark text as 'quoted' by putting [quote] .. [/quote] around it.
Please type in the code:
photo Add a picture:

Please do not post inappropriate pictures. Inappropriate pictures include pictures of minors and nudity. The owner of this web site reserves the right to delete such material.