易語言滑塊條設定透明視窗,易語言如何實現用滑塊條控制視窗透明度

2022-09-28 17:20:10 字數 4602 閱讀 2260

1樓:鈔麥商流

首先確定你已經新增了易語言自帶的支援庫

eapi

裡面有一條命令

設定視窗透明度()可以控制視窗透明度

在一個視窗內新增一個滑塊條

假設視窗為

視窗1滑塊條為

滑塊條1

在視窗的

建立完畢

事件中寫入以下**:

滑塊條1.刻度型別=0

滑塊條1.最大位置=255

滑塊條1.最小位置=0

滑塊條1.位置=0

在滑塊條的

位置被改變

事件中寫入以下**:

設定視窗透明度(視窗1.取視窗控制代碼(),255-滑塊條1.位置)至於美化

推薦你用擴充套件元件中的

多功能條

代替滑塊條

那個能換按鈕**

能自定義樣式

2樓:費施詩魏泰

不會寫配置?

寫個ini檔案儲存到程式的執行目錄

如:.版本

2.支援庫

eapi

.子程式

__啟動視窗_可否被關閉,

邏輯型寫到檔案

(取執行目錄()+

「\配置.ini」,

到位元組集

(到文字

(滑塊條1.位置)))『注意:整數型到位元組集的話為四個位元組集,但是在從位元組集轉換回來就為0,,所以先轉換到文字在轉換到位元組集

.子程式

__啟動視窗_建立完畢

滑塊條1.位置

=到整數

(到文字

(讀入檔案

(取執行目錄()+

「\配置.ini」)))

』上面是怎麼轉換的,這裡就怎麼轉換回來

一切搞定!

設定視窗透明度

(滑塊條1.位置,

)以上**絕對ok

,看我在網咖上網

為解決你的問題

特意下了個易語言來寫**的份上,,採納吧

3樓:呼延暮雨年吟

建立一個多功能條

最大位置設為225

**如下:

.版本2

.支援庫

iext6

.支援庫

eapi

.子程式

__啟動視窗_建立完畢

多功能條1.位置

=到數值

(讀配置項

(「c:\

documents

andsettings\

administrator

\桌面\1.ini」,

「窗體」,

「透明度」,

)).子程式

__啟動視窗_可否被關閉,

邏輯型寫配置項

(「c:\documents

andsettings\administrator\桌面\1.ini」,

「窗體」,

「透明度」,

到文字(多功能條1.位置))

.子程式

_多功能條1_位置被改變

設定視窗透明度

(取視窗控制代碼

(),多功能條1.位置)

易語言如何實現用滑塊條控制視窗透明度

4樓:王桂枝南丁

滑塊條的美化

主要是靠**。有好的**自然就美化了,

至於視窗透明,如果你不會api的話,就用現成的模組。

super-ec,或者萬能模組。都能實現透明功能。。

這些模組網上都有破解版的。。。

5樓:羽永芬揭詩

首先確定你已經新增了易語言自帶的支援庫

eapi

裡面有一條命令

設定視窗透明度()可以控制視窗透明度

在一個視窗內新增一個滑塊條

假設視窗為

視窗1滑塊條為

滑塊條1

在視窗的

建立完畢

事件中寫入以下**:

滑塊條1.刻度型別=0

滑塊條1.最大位置=255

滑塊條1.最小位置=0

滑塊條1.位置=0

在滑塊條的

位置被改變

事件中寫入以下**:

設定視窗透明度(視窗1.取視窗控制代碼(),255-滑塊條1.位置)至於美化

推薦你用擴充套件元件中的

多功能條

代替滑塊條

那個能換按鈕**

能自定義樣式

6樓:單秋英字水

有現成命令或用api....

現在外邊沒時間寫

如果有扣扣留下找你聊..

易語言怎麼滑動滑塊條來改視窗的透明度

7樓:匿名使用者

-----------dll命令---------------

.版本 2

.dll命令 設定透明, 整數型, , "setlayeredwindowattributes"

.引數 hwnd, 整數型

.引數 crkey, 整數型

.引數 alpha, 位元組型

.引數 dwflags, 整數型

.dll命令 取視窗風格, 整數型, , "getwindowlonga"

.引數 hwnd, 整數型

.引數 nindex, 整數型

.dll命令 置視窗風格, 整數型, , "setwindowlonga"

.引數 hwnd, 整數型

.引數 nindex, 整數型

.引數 hnew, 整數型

---------------程式**--------------

.版本 2

.子程式 透明窗體

.引數 視窗控制代碼, 整數型

.引數 透明值, 整數型, , 0-255

.區域性變數 風格, 整數型

風格 = 取視窗風格 (視窗控制代碼, -20)

風格 = 位或 (風格, 524288)

置視窗風格 (視窗控制代碼, -20, 風格)

設定透明 (視窗控制代碼, 0, 透明值, 2)

.子程式 _滑塊條1_位置被改變

透明窗體 (_啟動視窗.取視窗控制代碼 (), (11 - 滑塊條1.位置) × 0.1 × 255)'這句花了我半小時呀

8樓:匿名使用者

你看看是不是你想要的效果?

我想用易語言做一個滑塊條改變視窗底色、求原始碼。

9樓:三天打魚

.版本 2

.子程式 _滑塊條1_位置被改變

_啟動視窗.底色 = hsltorgb (滑塊條1.位置 ÷ 100, 0.5, 0.5)

.子程式 hue, 雙精度小數型

.引數 p, 雙精度小數型

.引數 q, 雙精度小數型

.引數 t, 雙精度小數型

.如果真 (t < 0)

t = t + 1

.如果真結束

.如果真 (t > 1)

t = t - 1

.如果真結束

.如果真 (t < 1 ÷ 6)

返回 (p + (q - p) × 6 × t).如果真結束

.如果真 (t < 1 ÷ 2)

返回 (q)

.如果真結束

.如果真 (t < 2 ÷ 3)

返回 (p + (q - p) × (2 ÷ 3 - t) × 6).如果真結束

返回 (p)

.子程式 hsltorgb, 整數型

.引數 h, 雙精度小數型

.引數 s, 雙精度小數型

.引數 l, 雙精度小數型

.區域性變數 r, 雙精度小數型

.區域性變數 g, 雙精度小數型

.區域性變數 b, 雙精度小數型

.區域性變數 q, 雙精度小數型

.區域性變數 p, 雙精度小數型

.判斷開始 (s = 0)

r = l

g = l

b = l

.預設q = 選擇 (l < 0.5, l × (1 + s), l + s - l × s)

p = 2 × l - q

r = hue (p, q, h + 1 ÷ 3)g = hue (p, q, h)

b = hue (p, q, h - 1 ÷ 3).判斷結束

返回 (取顏色值 (四捨五入 (r × 255, ), 四捨五入 (g × 255, ), 四捨五入 (b × 255, )))

.子程式 __啟動視窗_建立完畢

滑塊條1.最大位置 = 100

滑塊條1.頁改變值 = 1

轉換色彩空間 然後…… 你複製**測試一下吧

易語言漢編模組,全自繪視窗和自繪的滑塊條,怎麼用自繪的滑塊條控制視窗的透明度,和自繪的選單按鈕怎麼 10

10樓:匿名使用者

.版本 2

.支援庫 eapi

.子程式 _橫向滾動條1_位置被改變

設定視窗透明度 (取視窗控制代碼 (), 橫向滾動條1.位置)滑塊變速條?

如果你指的是 橫向條幅的話 那個他會自帶 只要網頁超出超文字瀏覽框 他就會自帶滑塊條 橫向縱向的都有

易語言視窗銷燬問題,易語言如何關閉視窗?

啟動視窗。銷燬 真 登入。銷燬 真 驗證。銷燬 真 呼叫格式 無返回值 物件 銷燬 邏輯型 立即銷燬 系統核心支援庫 視窗。英文名稱 destroy 銷燬本視窗或視窗元件。視窗被銷燬後,所有在載入本視窗之後對本視窗及其內視窗元件所進行的修改或設定都將被拋棄,視窗被銷燬後如想再次使用必須重新裝載。注意...

易語言求助

版本 2 程式集 視窗程式集1 子程式 按鈕1 被單擊 時鐘1.時鐘週期 50 子程式 時鐘1 週期事件 標籤1.左邊 標籤1.左邊 5 標籤1.文字顏色 取隨機數 1,225 取隨機數 1,225 取隨機數 1,225 如果真 標籤1.左邊 0 時鐘1.時鐘週期 0 時鐘2.時鐘週期 50 如果真...

易語言迴圈

幫你加了一個 進度條用來顯示開啟空間的進度,還有判斷第一個空間開啟完畢了再開啟下一個,還有用一個按鈕來控制 開始 和 停止 版本 2 支援庫 htmlview 支援庫 spec 程式集 視窗程式集1 程式集變數 開啟進度,整數型 子程式 超文字瀏覽框1 載入進度改變 引數 進度百分比,整數型 開啟進...