国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁(yè) > 學(xué)院 > 開(kāi)發(fā)設(shè)計(jì) > 正文

如何做旋轉(zhuǎn)的光盤(pán)動(dòng)畫(huà)

2019-11-18 17:37:51
字體：大 中 小
來(lái)源：轉(zhuǎn)載
供稿：網(wǎng)友
在播放器的主界面放置一個(gè)能隨音樂(lè)的播放而旋轉(zhuǎn)的光盤(pán)是不是很誘人？如若你對(duì)此感興趣又不知從何下手，請(qǐng)往下看。

先準(zhǔn)備幾幅圖，格式不論，但I(xiàn)con圖標(biāo)最理想。圖的數(shù)量將是光盤(pán)旋轉(zhuǎn)效果的決定因素之一，一般八張比較合適。這八幅圖必須是光盤(pán)處于0度、45度、90度……315度時(shí)的實(shí)際模樣。

下一步：給工程添加三個(gè)控件，ImageList一個(gè)，Image一個(gè)，Timer一個(gè)。ImageList是用來(lái)裝載圖片的，請(qǐng)將準(zhǔn)備好的圖片按順序一一添加到此控件中；Image控件則是顯示旋轉(zhuǎn)光盤(pán)的容器了，將其放到合適的位置即可，必要時(shí)給它加載一幅圖片；Timer控件則用于控制光盤(pán)的旋轉(zhuǎn)。

最后，編寫(xiě)代碼：

OptionExplicit

DimiasInteger'圖標(biāo)索引變量

EndSub

PrivateSubTimer1_Timer()
i=i 1'隨控時(shí)器變化每次加1
'若索引號(hào)大于圖標(biāo)總數(shù)則退回第一幅
Ifi>ImageList1.ListImages.CountTheni=1
'從ImageList控件中裝載圖標(biāo)
Image1.Picture=ImageList1.ListImages(i).Picture
EndSub

短短幾行代碼，光盤(pán)就轉(zhuǎn)動(dòng)起來(lái)了！其實(shí)，你還可以略作改造，用旋轉(zhuǎn)并移動(dòng)的光盤(pán)動(dòng)畫(huà)來(lái)代替你的播放進(jìn)度條，則會(huì)更有創(chuàng)意哦。->

發(fā)表評(píng)論 共有條評(píng)論
用戶(hù)名: 密碼:
驗(yàn)證碼: 匿名發(fā)表
主站蜘蛛池模板： 德庆县| 清河县| 威宁| 定襄县| 栾城县| 嘉义县| 台山市| 旺苍县| 祥云县| 云林县| 余庆县| 威远县| 新余市| 龙海市| 正安县| 丹阳市| 阿图什市| 上高县| 乌拉特前旗| 旺苍县| 屏东县| 深州市| 洪湖市| 波密县| 临江市| 大厂| 共和县| 玉龙| 富源县| 英山县| 肥西县| 四平市| 丰镇市| 麦盖提县| 丰镇市| 南川市| 金秀| 竹溪县| 顺义区| 上高县| 巨鹿县|