{"id":158,"date":"2007-05-12T16:22:23","date_gmt":"2007-05-12T14:22:23","guid":{"rendered":" http:\/\/www.nsonic.de\/blog\/2007\/05\/animated-cursors\/"},"modified":"2007-05-12T16:22:25","modified_gmt":"2007-05-12T14:22:25","slug":"animated-cursors","status":"publish","type":"post","link":"https:\/\/www.nsonic.de\/blog\/2007\/05\/animated-cursors\/","title":{"rendered":"Animated Cursors"},"content":{"rendered":"<p>animierte Cursor benutzen<\/p>\n<p><em>Frequently Asked Questions<br \/>\n&#8211; Using an animated cursor.<\/p>\n<p><b>Question:<br \/>\n<\/b>How do use an animated cursor?<br \/>\n<\/em><br \/>\n<b>Answer:<br \/>\n<\/b>You will first need to get a handle to a Windows<br \/>\ncursor and assign it to the TScreen component&#8217;s Cursors array.<\/p>\n<p>Predefined cursors start at a negative index, and user defined<br \/>\ncustom cursors are assigned positive indexes.<\/p>\n<p>The following is an example of a Delphi form that uses an animated cursor:<\/p>\n<p>[code lang=&#8221;delphi&#8221;]procedure TForm1.Button1Click(Sender: TObject);<br \/>\nvar<br \/>\n  h : THandle;<br \/>\nbegin<br \/>\n  h := LoadImage(0,<br \/>\n                 &#8216;C:\\TheWall\\Magic.ani&#8217;,<br \/>\n                 IMAGE_CURSOR,<br \/>\n                 0,<br \/>\n                 0,<br \/>\n                 LR_DEFAULTSIZE or<br \/>\n                 LR_LOADFROMFILE);<br \/>\n  if h = 0 then ShowMessage(&#8216;Cursor not loaded&#8217;) else begin<br \/>\n    Screen.Cursors[1] := h;<br \/>\n    Form1.Cursor := 1;<br \/>\n  end;<br \/>\nend;<br \/>\n[\/code]<\/p>\n<p>[tags]Delphi, Graphic[\/tags]<\/p>\n","protected":false},"excerpt":{"rendered":"<p>animierte Cursor benutzen Frequently Asked Questions &#8211; Using an animated cursor. Question: How do use an animated cursor? Answer: You will first need&hellip;<\/p>\n","protected":false},"author":2,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"spay_email":""},"categories":[11],"tags":[75,101],"jetpack_featured_media_url":"","jetpack_shortlink":"https:\/\/wp.me\/p71Tml-2y","_links":{"self":[{"href":"https:\/\/www.nsonic.de\/blog\/wp-json\/wp\/v2\/posts\/158"}],"collection":[{"href":"https:\/\/www.nsonic.de\/blog\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/www.nsonic.de\/blog\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/www.nsonic.de\/blog\/wp-json\/wp\/v2\/users\/2"}],"replies":[{"embeddable":true,"href":"https:\/\/www.nsonic.de\/blog\/wp-json\/wp\/v2\/comments?post=158"}],"version-history":[{"count":0,"href":"https:\/\/www.nsonic.de\/blog\/wp-json\/wp\/v2\/posts\/158\/revisions"}],"wp:attachment":[{"href":"https:\/\/www.nsonic.de\/blog\/wp-json\/wp\/v2\/media?parent=158"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/www.nsonic.de\/blog\/wp-json\/wp\/v2\/categories?post=158"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/www.nsonic.de\/blog\/wp-json\/wp\/v2\/tags?post=158"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}