游動的窗體

2022-03-09 14:39:10 字數 962 閱讀 8070

示例二:游動的窗體

朋友,您使用過linux嗎?如果您使用過的話,那麼linux中那只游動的可愛小企鵝,一定忘不了。其實,該功能實現很簡單,下面,筆者將帶您一起來實現它。

實現步驟:

1. 建立新專案檔案demo2.prj;

2. 建立模組檔案demo2.bas.並在模組中加入如下**:

public declare function getcursorpos lib "user32" (lppoint as

pointapi) as long

public type pointapi

x as long

y as long

end type

public oldx as long

public oldy as long

public newx as long

public newy as long

public pnt as pointapi

3.在窗體上加入乙個時間控制項timer1_timer處理程式中加入如下**:

private sub timer1_timer()

me.setfocus

getcursorpos pnt

oldx = form1.left

oldy = form1.top

newx = pnt.x * 13.5

newy = pnt.y * 13.5

incx = (newx - oldx) / 80 * 13.5

incy = (newy - oldy) / 80 * 13.5

form1.move oldx + incx, oldy + incy

end sub

4.在image1_dblclick處理程式中加入如下**:

private sub image1_dblclick()

unload me

end sub

WPF特效 魚游動動畫2

原文 wpf特效 魚游動動畫2 純 擼動畫實踐2 原圖 png格式 新增effect以及effect動畫處理後gif效果 處理 眼部放大縮小動畫 嘴縮放動畫 尾部收縮動畫 顏色變化效果動畫。技術點 基於開源外掛程式 pixelshadereffects doubleanimationproperty...

WPF特效 魚游動動畫2

原文 wpf特效 魚游動動畫2 純 擼動畫實踐2 原圖 png格式 新增effect以及effect動畫處理後gif效果 處理 眼部放大縮小動畫 嘴縮放動畫 尾部收縮動畫 顏色變化效果動畫。技術點 基於開源外掛程式 pixelshadereffects doubleanimationproperty...

WPF特效 魚游動動畫3

原文 wpf特效 魚游動動畫3 wpf不支援骨骼,故使用3dmax匯出了序列模型檔案 mtl obj 方法1 方法2 wpf有很多動態載入obj模型檔案的類庫,使用迴圈方法,動態載入所有obj檔案,動態生成每個obj對應的序列圖。尚未嘗試,理論毫無問題 方法3 使用unity3d 開啟匯出的帶骨骼的...