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

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

用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; 

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

本類教程下載

系統下載排行

主站蜘蛛池模板: 欧美国产日韩一区 | 精品久久一区二区三区 | 国产 日韩 欧美 亚洲 | 久久国产精品一区二区 | 午夜噜噜噜 | 日本三区四区免费高清不卡 | www.国产精品.com| 国产在线观看午夜不卡 | 日本免费高清在线观看播放 | 国产成人综合久久精品亚洲 | 亚洲一区国产 | 欧美另类videosbest视频 | 久操热| 日日添天天做天天爱 | 亚洲国产一成人久久精品 | 国产好痛疼轻点好爽的视频 | 美女mm131爽爽爽免费视色 | 亚洲一区欧美日韩 | 青青在线精品视频 | 99精品网| 在线播放成人高清免费视频 | 妞干网欧美| 一区二区精品在线 | 日韩视频免费在线播放 | 九九视频精品全部免费播放 | 久久99亚洲精品久久久久99 | 22222色男人的天堂 | 91夜夜操 | 99精品久久久久久久婷婷 | 国产男女猛视频在线观看网站 | 亚洲视频在线网 | 午夜做性视频 | 久久免费视频播放 | 污视频网址| 午夜在线播放免费人成无 | 中文字幕日韩精品麻豆系列 | 人人看人人爽久久 | 91亚洲精品丁香在线观看 | 国产三级在线观看免费 | 成人欧美视频 | 中文字幕 亚洲一区 |