日本国产亚洲-日本国产一区-日本国产一区二区三区-日本韩国欧美一区-日本韩国欧美在线-日本韩国欧美在线观看

當前位置:雨林木風下載站 > 技術開發教程 > 詳細頁面

用delphi制作抖動窗體

用delphi制作抖動窗體

更新時間:2022-05-07 文章作者:未知 信息來源:網絡 閱讀次數:

以下程序將教你如何制作一個窗體,窗體一旦運行將在屏幕上不斷抖動.

定義兩個變量:

var

BackLeft,BackTop,I:integer;

//保存窗體的left

BackLeft := Left;

//保存窗體的top

BackTop := Top;

//其中number可由你設置一個靈活的數字,當然值由你定

for I:=1 to Number do

begin  

//水平抖動
Left:= (BackLeft-10) + (Random(20));

//垂直抖動
Top := (BackTop-10) + (Random(20));

end;
//備份窗體的left
Left := BackLeft;

//備份窗體的top

Top  := BackTop; 

溫馨提示:喜歡本站的話,請收藏一下本站!

本類教程下載

系統下載排行

主站蜘蛛池模板: 亚洲高清中文字幕 | 欧美一级成人毛片视频 | 午夜寻花高颜值极品女神 | 欧美日韩在线视频 | 国产在线一区二区三区 | 成人久久18免费网 | 国产亚洲一区二区精品 | 天天射天天色天天干 | 日韩亚洲欧美在线观看 | 精品中文字幕一区在线 | 亚洲综合色丁香婷婷六月图片 | 在线免费色视频 | 日韩毛片在线免费观看 | 日本黄免费| 最新99国产成人精品视频免费 | 亚洲宗合 | 欧美日本视频在线观看 | avtt天堂网永久资源手机版 | 亚洲精品久久久久中文 | 久久网综合 | 欧美成人h| 亚洲黄色免费观看 | 天天爱天天做天天爽 | 天天射天天草 | 久久福利网站 | 国产精品99爱免费视频 | 欧美成人高清视频 | 欧美激情一区二区三区在线播放 | 在线观看日批视频 | 国产爱| 国产精品1| 亚洲一区日韩 | 欧美日韩综合一区 | 天堂网在线资源www种子 | 天天射天天操天天 | 四虎精品影院永久在线播放 | 狠狠操天天操夜夜操 | 成人爱爱视频 | 日韩免费影视 | 久久bt核合涩工厂亚洲合集 | 精品无码久久久久久国产 |