易語言制作屏幕右下角彈出窗口的源碼
更新時間:2018年12月05日 11:23:49 作者:易語言源碼教程
今天小編就為大家分享一篇關(guān)于易語言制作屏幕右下角彈出窗口的源碼,小編覺得內(nèi)容挺不錯的,現(xiàn)在分享給大家,具有很好的參考價值,需要的朋友一起跟隨小編來看看吧
屏幕右下角廣告
.版本 2 .程序集 窗口程序集1 .程序集變量 伸縮判斷, 邏輯型 .子程序 __啟動窗口_創(chuàng)建完畢 .子程序 _時鐘1_周期事件 .如果 (伸縮判斷 = 真) .如果真 (窗口1.頂邊 > 取屏幕高度 () - 窗口1.高度 - 30) 窗口1.移動 (, 窗口1.頂邊 - 1, , ) .如果真結(jié)束 .否則 .如果真 (窗口1.頂邊 < 取屏幕寬度 ()) 窗口1.移動 (, 窗口1.頂邊 + 1, , ) .如果真結(jié)束 .如果結(jié)束 .子程序 _按鈕_關(guān)閉_被單擊 伸縮判斷 = 假 時鐘1.時鐘周期 = 1 .子程序 _時鐘2_周期事件 伸縮判斷 = 真 時鐘1.時鐘周期 = 1 載入 (窗口1, , 真) 時鐘2.時鐘周期 = 0 .子程序 _按鈕_彈出_被單擊 載入 (窗口1, _啟動窗口, 假) 窗口1.移動 (取屏幕寬度 () - 窗口1.寬度, 取屏幕高度 (), , ) _啟動窗口.獲取焦點 () 時鐘2.時鐘周期 = 2000
運行結(jié)果:
總結(jié)
以上就是這篇文章的全部內(nèi)容了,希望本文的內(nèi)容對大家的學(xué)習或者工作具有一定的參考學(xué)習價值,謝謝大家對腳本之家的支持。如果你想了解更多相關(guān)內(nèi)容請查看下面相關(guān)鏈接