不少軟件作者肯定因?yàn)橐渍Z言沒有內(nèi)置自定義外形按鈕而煩惱,不過你卻可以用其他組件來實(shí)現(xiàn)——用畫板制作自定義外形按鈕
1、新建一個(gè)“易語言”窗口程序
2、添加組件——一個(gè)畫板到窗口內(nèi)
為了方便定位按鈕的位置
你可以把畫板的寬度設(shè)置為:80,高度也設(shè)置為:80
為了清楚畫板在哪里,可以把底色設(shè)置成你喜歡的顏色
3、然后就可以輸入代碼了
先輸入變量代碼,代碼如下:
.版本 2.程序集 窗口程序集_啟動窗口.程序集變量 鼠標(biāo)停留在畫板內(nèi), 邏輯型.程序集變量 鼠標(biāo)移動在畫板內(nèi), 邏輯型.程序集變量 橫坐標(biāo), 整數(shù)型.程序集變量 縱坐標(biāo), 整數(shù)型.程序集變量 半徑, 整數(shù)型.程序集變量 x, 雙精度小數(shù)型.程序集變量 y, 雙精度小數(shù)型.子程序 __啟動窗口_創(chuàng)建完畢橫坐標(biāo) = 50 ' 設(shè)置變量數(shù)值縱坐標(biāo) = 50 ' 設(shè)置變量數(shù)值半徑 = 25 ' 設(shè)置變量數(shù)值
1、添加畫板焦點(diǎn)顏色
先繪畫畫板外形
代碼如下:
.版本 2.子程序 _畫板1_繪畫.參數(shù) 重畫區(qū)左邊, 整數(shù)型.參數(shù) 重畫區(qū)上邊, 整數(shù)型.參數(shù) 重畫區(qū)右邊, 整數(shù)型.參數(shù) 重畫區(qū)下邊, 整數(shù)型畫板1.畫橢圓 (橫坐標(biāo) - 半徑, 縱坐標(biāo) - 半徑, 橫坐標(biāo) + 半徑, 縱坐標(biāo) + 半徑) ' 畫板1.畫橢圓 你可以替換成 畫板1.畫矩形 等其他形狀
2、添加畫板焦點(diǎn)圖片
代碼如下:
.版本 2.子程序 _畫板1_鼠標(biāo)位置被移動, 邏輯型.參數(shù) 橫向位置, 整數(shù)型, , 鼠標(biāo)指針橫向位置.參數(shù) 縱向位置, 整數(shù)型, , 鼠標(biāo)指針縱向位置.參數(shù) 功能鍵狀態(tài), 整數(shù)型x = 橫向位置 - 橫坐標(biāo)y = 縱向位置 - 縱坐標(biāo).如果 (x × x + y × y < 半徑 × 半徑) ' 檢測鼠標(biāo)指針位置是否在畫板內(nèi) .如果 (鼠標(biāo)停留在畫板內(nèi)) .否則 畫板1.刷子顏色 = #淺灰 .如果結(jié)束 .如果真 (取反 (鼠標(biāo)移動在畫板內(nèi))) 畫板1.重畫 () ' 重畫——畫板1.刷子顏色 = #淺灰 .如果真結(jié)束 鼠標(biāo)移動在畫板內(nèi) = 真 ' 等于真則返回假——鼠標(biāo)離開畫板后畫板顏色改變,等于假則返回真——鼠標(biāo)離開畫板后畫板顏色不變.否則 畫板1.刷子顏色 = #白色 .如果真 (鼠標(biāo)移動在畫板內(nèi)) 畫板1.重畫 () ' 重畫——畫板1.刷子顏色 = #白色 .如果真結(jié)束 鼠標(biāo)移動在畫板內(nèi) = 假 ' 等于真則返回假——鼠標(biāo)離開畫板后畫板顏色改變,等于假則返回真——鼠標(biāo)離開畫板后畫板顏色不變
3、按F5運(yùn)行看看
當(dāng)鼠標(biāo)停留在畫板內(nèi),畫板顏色就會變成灰色
當(dāng)鼠標(biāo)離開在畫板內(nèi),畫板顏色就會變成白色
1、添加畫板按鈕效果
命令及變量我已經(jīng)解釋過了,就不多解釋了
直接輸入代碼,代碼如下:
.版本 2.子程序 _畫板1_鼠標(biāo)左鍵被按下, 邏輯型.參數(shù) 橫向位置, 整數(shù)型.參數(shù) 縱向位置, 整數(shù)型.參數(shù) 功能鍵狀態(tài), 整數(shù)型x = 橫向位置 - 橫坐標(biāo)y = 縱向位置 - 縱坐標(biāo).如果真 (x × x + y × y < 半徑 × 半徑) 鼠標(biāo)停留在畫板內(nèi) = 真 畫板1.刷子顏色 = #灰色.如果真結(jié)束畫板1.重畫 ().子程序 _畫板1_鼠標(biāo)左鍵被放開, 邏輯型.參數(shù) 橫向位置, 整數(shù)型.參數(shù) 縱向位置, 整數(shù)型.參數(shù) 功能鍵狀態(tài), 整數(shù)型鼠標(biāo)停留在畫板內(nèi) = 假x = 橫向位置 - 橫坐標(biāo)y = 縱向位置 - 縱坐標(biāo).如果真 (x × x + y × y < 半徑 × 半徑) 信息框 (“按鈕被按下”, 0, ) 畫板1.重畫 ().如果真結(jié)束
2、這樣基本畫板按鈕就完成了
按F5運(yùn)行看看效果
這樣就可以實(shí)現(xiàn)自定義外形按鈕了
新聞熱點(diǎn)
疑難解答