最近忙著搬移重新整理網站資料,工作告一段落才有空回覆這個很久前的問題

 


問題:模擬彈跳球


1.可設定球大小


2.可改變彈跳速度


3.畫面中心點為球的起始點

 

 


這個問題使用畫圖的方式來處理,面板放Picture元件當作顯示區域,彈跳速度用改變球位移量來達成,面板配置如下

20131008-01  

 

 


程式的主要目標就是連續改變球的中心點座標畫圖


一開始先調用Picture元件屬性,計算繪圖區中心點,和移動座標的最大值,移動座標最大值由顯示區域最大值減球的半徑。Picture元件的0點在左上角,最大值在右下角


座標計算分成上下和左右2組,計算方法相同。一開始座標值加上移動量,在座標值大於等於移動座標最大值時,改成座標值減去移動量,在座標值小於等於球半徑值時,再改成座標值加上移動量。如此座標值反復變化,把球限制在Picture元件顯示範圍內

20131008-02  

 

 


球是以45度斜角移動,若把程式改成上下和左右的移動量不同,球會以不同角度移動

20131008-03  

arrow
arrow
    文章標籤
    彈跳球
    全站熱搜

    未出師的小工程師 發表在 痞客邦 留言(0) 人氣()