複製鏈接
請複製以下鏈接發送給好友

ANI

(文件擴展名)

鎖定
ANI(APPlicedon Startins Hour Glass)文件是MS-Windows的動畫光標文件,其文件擴展名為“.ani”。
中文名
動畫光標文件
外文名
APPlicedon Startins Hour Glass
外語縮寫
ANI
來    源
電腦文件常見擴展名一種

目錄

ANI簡介

ani文件是鼠標效果的文件,可以從控制面板--鼠標--指針選項裏瀏覽這個文件,就可以改變鼠標的顯示效果。ani文件不能象bmp位圖一樣,直接插入資源裏去。簡單的解釋它屬於一種動畫光標文件。 [1] 
ani文件一般由四部分構成:文字説明區、信息區、時間控制區和數據區,即ACONLIST塊。anih塊、rate塊和LIST塊。任何光標編輯軟件都能打開,包括microangelo,Acdsee也完全能夠打開ani文件,雖然默認ani文件是沒有關聯到acdsee的,你必須用右鍵“open with”找到acdsee才能打開。 [2] 

ANIVB中使用

Visual Basic中MouseIcon不能設置.ani格式鼠標,但可以通過API設置.ani格式的動畫。
代碼 [3] 
Private Declare Function LoadCursorFromFile Lib "user32" Alias "LoadCursorFromFileA"(ByVal lpFilename As String) As Long
Private Declare Function DestroyCursor Lob "user32"(ByVal hCursor As Long) As Long
Private Declare Function SetClassLong Lib "user32" Alias "SetClassLongA" (ByVal hwnd As Long, ByVal nIndex As Long, ByVal dwNewLong As Long) As Long
Private Const GCL_HCURSOR = (-12)

Dim AniCur As Long
Private Sub Form_Load()
  AniCur& = LoadCursorFromFile(App.Path & "\文件名.ani")
  SetClassLong Me.hwnd,GCL_HCURSOR,AniCur 
End Sub

Private Sub Form_Unload(Cancel As Integer)
  DestroyCursor AniCur
End Sub
參考資料