當前位置:首頁 » 操作系統 » 易語言加群源碼

易語言加群源碼

發布時間: 2022-05-17 05:44:41

1. 易語言 喚起QQ加好友 源碼怎麼寫 最好能給我個源碼!謝謝

通知: 為了答謝長期以來的好友,凡是在我的好友都有機會獲得:一等獎:奧迪一輛《真車》二等獎:120平米住房一套(自選)三等獎:現金10萬元《人民幣》紀念獎:手機一部《蘋果6》鼓勵獎:一百元請用硬幣或指甲刮開屏幕驗證碼獲取獎品! 溫馨提示:如用手刮不出,請用刀刮。刮獎區:█████●●█〓████▅▄▄▄▃▃▃▄
〓 █★平地一聲響★█ 〓
▅███████████▅▄...........
███████████████
◥⊙▲⊙▲⊙▲⊙▲⊙▲⊙▲⊙

2. 易語言源碼

哦 哦 ,那我給你個記事本的源碼吧 如下
.版本 2
.支持庫 iext2
.支持庫 iext
.支持庫 eAPI

.程序集 窗口程序集1
.程序集變數 文件路徑, 文本型
.程序集變數 當前是否正在打字, 邏輯型

.子程序 _超級編輯框1_內容被改變, , , 更改超級編輯框的顏色
.局部變數 顏色, 字元格式

顏色.文本顏色 = 取顏色值 (取隨機數 (0, 255), 取隨機數 (0, 255), 取隨機數 (0, 255))
超級編輯框1.置選擇區字元格式 (顏色)
狀態條1.置文本 (0, 「行 」 + 到文本 (超級編輯框1.取行數 ()) + 「 文本長度 」 + 到文本 (超級編輯框1.取文本長度 ()))

.子程序 __啟動窗口_創建完畢, , , 設置通用對話框

通用對話框1.過濾器 = 「txt|*.txt」
通用對話框1.默認文件後綴 = 「txt」
通用對話框1.標題 = 「傳說記事本保存對話框...」
_時間日期_被選擇 ()
_炫銀皮膚_被選擇 ()
備忘錄提醒 ()

.子程序 __啟動窗口_位置被改變, , , 位置被改變後超級編輯框也跟著改變(按鈕1也跟著改變)

.如果真 (_啟動窗口.位置 = 3)
超級編輯框1.寬度 = 取屏幕寬度 () - 3
超級編輯框1.高度 = 取屏幕高度 () - 80 - 按鈕1.高度 - 10
按鈕1.頂邊 = 取屏幕高度 () - 狀態條1.高度 - 100
按鈕1.寬度 = 取屏幕寬度 () - 5
按鈕1.高度 = 狀態條1.高度 + 10
.如果真結束
.如果真 (_啟動窗口.位置 = 0)
超級編輯框1.寬度 = _啟動窗口.寬度 - 10
超級編輯框1.高度 = _啟動窗口.高度 - 55 - 按鈕1.高度 - 10
按鈕1.頂邊 = 200
按鈕1.寬度 = 560

.如果真結束

.子程序 _新建_被選擇, , , New文件

.如果真 (超級編輯框1.內容 ≠ 「」)
.如果真 (信息框 (「您還沒保存!請問您要進行保存嗎?」, 4, ) = #是鈕)
通用對話框1.類型 = 1
通用對話框1.打開 ()
寫到文件 (通用對話框1.文件名, 到位元組集 (超級編輯框1.內容))
.如果真結束

.如果真結束

.子程序 _打開_被選擇, , , Open文件

通用對話框1.類型 = 0
通用對話框1.打開 ()
.如果真 (通用對話框1.文件名 ≠ 「」)
超級編輯框1.內容 = 到文本 (讀入文件 (通用對話框1.文件名))
文件路徑 = 通用對話框1.文件名

.如果真結束

.子程序 _保存_被選擇, , , Save文件

.如果真 (文件路徑 = 「」)
通用對話框1.類型 = 1
通用對話框1.打開 ()
寫到文件 (通用對話框1.文件名, 到位元組集 (超級編輯框1.內容))
.如果真結束
.如果真 (文件路徑 ≠ 「」)
寫到文件 (文件路徑, 到位元組集 (超級編輯框1.內容))
.如果真結束

.子程序 _保存到_被選擇, , , Save As文件

通用對話框1.類型 = 1
通用對話框1.打開 ()
.如果真 (通用對話框1.文件名 ≠ 「」)
寫到文件 (通用對話框1.文件名, 到位元組集 (超級編輯框1.內容))
.如果真結束

.子程序 _撤銷_被選擇, , , Undo 文本

超級編輯框1.撤消 ()

.子程序 _剪切_被選擇, , , Cut 文本

超級編輯框1.剪切 ()

.子程序 _復制_被選擇, , , Copy 文本

超級編輯框1.復制 ()

.子程序 _粘連_被選擇, , , Paste文本

超級編輯框1.粘貼 ()

.子程序 _刪除_被選擇, , , Delete文本

超級編輯框1.刪除 ()
超級編輯框1.內容 = 取文本左邊 (超級編輯框1.內容, 取文本長度 (超級編輯框1.內容) - 1)

.子程序 _尋找_被選擇, , , Find文本

載入 (Find窗口, , 真)

.子程序 _尋找下一個_被選擇, , , 還沒解決好

.子程序 _文本替換_被選擇, , , 文本替換

載入 (文本替換窗口, , 真)

.子程序 _跳到_被選擇, , , 還沒解決好

載入 (跳到窗口, , 真)

.子程序 _全選_被選擇, , , Select All文本

超級編輯框1.被選擇字元數 = 取文本長度 (超級編輯框1.內容)

.子程序 _時間日期_被選擇, , , Time-Date
.局部變數 小時, 文本型
.局部變數 分鍾, 文本型
.局部變數 日期, 文本型
.局部變數 年份, 文本型
.局部變數 月份, 文本型
.局部變數 日份, 文本型

小時 = 到文本 (取小時 (取現行時間 ()))
分鍾 = 到文本 (取分鍾 (取現行時間 ()))
年份 = 到文本 (取年份 (取現行時間 ()))
月份 = 到文本 (取月份 (取現行時間 ()))
日份 = 到文本 (取日 (取現行時間 ()))
狀態條1.置文本 (1, 小時 + 「:」 + 分鍾 + 「 」 + 年份 + 「-」 + 月份 + 「-」 + 日份)

.子程序 _傳說記事本v13_被選擇, , , About Notepad

信息框 (「軟體作者:古老的傳說」 + #換行符 + 「QQ:1041750677」 + #換行符 + 「MSN:[email protected]」 + #換行符 + 「編寫工具:易語言」 + #換行符 + 「軟體版本:1.3」 + #換行符, 0, )

.子程序 _密碼保管_被選擇, , , Password Protect

載入 (密碼窗口, , 真)

.子程序 _備忘錄_被選擇, , , 載入備忘錄窗口

載入 (備忘錄窗口, , 真)

.子程序 備忘錄提醒, , , 備忘錄提醒
.局部變數 分割文本, 文本型, , "0"
.局部變數 今天日期, 文本型
.局部變數 分割今天日期, 文本型, , "0"

分割文本 = 分割文本 (讀配置項 (取運行目錄 () + 「\備忘錄.ini」, 「備忘錄」, 「提示日期」, ), 「日」, )
今天日期 = 到文本 (取日期 (取現行時間 ()))
分割今天日期 = 分割文本 (今天日期, 「日」, )
.如果真 (取數組成員數 (分割文本) = 1 或 取數組成員數 (分割文本) > 1)
.如果真 (分割文本 [1] = 分割今天日期 [1])
狀態條1.置文本 (2, 「您今天有一份備忘錄噢^_^」)
.如果真結束

.如果真結束

.子程序 _銀白皮膚_被選擇, , , 銀白皮膚

更換新皮膚 (1)

.子程序 _淺白皮膚_被選擇, , , 淺白皮膚

更換新皮膚 (10)

.子程序 _淺灰皮膚_被選擇, , , 淺灰皮膚

更換新皮膚 (13)

.子程序 _淺藍皮膚_被選擇, , , 淺藍皮膚

更換新皮膚 (19)

.子程序 _淺黑皮膚_被選擇, , , 淺黑皮膚

更換新皮膚 (5)

.子程序 _炫銀皮膚_被選擇, , , 炫銀皮膚

更換新皮膚 (2)

.子程序 _炫白皮膚_被選擇, , , 炫白皮膚

更換新皮膚 (15)

.子程序 _炫藍皮膚_被選擇, , , 炫藍皮膚

更換新皮膚 (18)

.子程序 _深黑皮膚_被選擇, , , 深黑皮膚

更換新皮膚 (14)

.子程序 __啟動窗口_可否被關閉, 邏輯型, , 透明顯示最小化運行
.局部變數 變數1, 整數型

變數1 = 255
.計次循環首 (255, )
設置窗口透明度 (_啟動窗口.取窗口句柄 (), 變數1)
變數1 = 變數1 - 1
.如果真 (變數1 = 1)
置托盤圖標 (#程序圖標, 「古老的傳說記事本v1.2」)
_啟動窗口.可視 = 假
.如果真結束

.計次循環尾 ()

返回 (假)

.子程序 __啟動窗口_托盤事件, , , 透明顯示_啟動窗口
.參數 操作類型, 整數型
.局部變數 變數1, 整數型

.如果真 (操作類型 = 1)
_啟動窗口.可視 = 真
.計次循環首 (255, 變數1)
設置窗口透明度 (_啟動窗口.取窗口句柄 (), 變數1)
.計次循環尾 ()
.如果真結束
.如果真 (操作類型 = 3)
彈出菜單 (圖標菜單, 取滑鼠水平位置 (), 取滑鼠垂直位置 ())

.如果真結束

.子程序 __啟動窗口_將被銷毀, , , 銷毀任務欄圖標

置托盤圖標 ({ }, )

.子程序 _打開傳說記事本_被選擇, , , _啟動窗口.可視=真

__啟動窗口_托盤事件 (1)

.子程序 _銷毀_被選擇, , , 銷毀軟體

銷毀 ()

.子程序 _超級編輯框1_按下某鍵, 邏輯型, , 正在打字中...
.參數 鍵代碼, 整數型
.參數 功能鍵狀態, 整數型

當前是否正在打字 = 真
按鈕1.標題 = 「正在打字中...」
時鍾1.時鍾周期 = 800
返回 (真)

.子程序 _超級編輯框1_放開某鍵, 邏輯型, , 暫停打字中...
.參數 鍵代碼, 整數型
.參數 功能鍵狀態, 整數型

當前是否正在打字 = 假
返回 (真)

.子程序 _時鍾1_周期事件, , , 暫停打字中...

.如果真 (當前是否正在打字 = 假)
按鈕1.標題 = 「暫停打字中...」

.如果真結束

.子程序 _超級編輯框1_選擇區被改變, , , 超級編輯框1.滾動

超級編輯框1.滾動 (1)

3. 酷Q怎麼獲取陌生群的群主QQ,求易語言源碼,注意是還沒有加的群

唉!我現在也在做這個功能,也是找不到辦法,網上搜搜就看到你的提問!

4. 易語言怎麼添加源碼

雙擊窗口或者窗口中的組件,就會自動建立一個事件子程序,在裡面寫你的代碼就可以了。

如果想新建子程序,可以按Ctrl+N

如果想把其他易語言程序放進來,可以通過菜單「編輯」,導入其他程序,就可以把兩個程序合並了。

5. 易語言怎麼點擊按鈕加QQ群

http讀文件(這里填你Q群的 加群代碼)
加群代碼在Q群首頁那裡有個「加群幫手」

吧裡面的超鏈接復制下來 就可以了

6. 易語言的Q群驗證怎麼寫

直接抓包就行,登陸qq群那個官網里,裡面有你所有的q群號,然後寫在你的易語言里,通過填寫qq賬號密碼來判斷qq群裡面是否存在這個群號,如果存在就載入窗口1 沒載入就載入窗口2

7. 易語言源碼怎麼使用

首先要確認你已經安裝了易語言編輯軟體,那樣的話,適用易語言打開就可以進行編譯或調試了

8. 易語言怎麼弄一個按鈕就加入指定秋秋群

你可以網路一下「QQ群一鍵加群」,第一個就是

9. 易語言怎麼點擊一個按鈕加入QQ群,求源碼。

添加一個按鈕,然後在寫入代碼,打開指定網頁,就完成了

10. 易語言怎麼綁定QQ群!

汗```你要得到你真的個群所在的TX資料庫...
你不如自己弄個小站..只要注冊就好了...然後讓你群里去注冊...你來批准...
然後使用程序每次要登入他們注冊的帳號
登入以後遠程檢索伺服器資料庫
看有無使用許可權
資料庫存在就說明有
不存在則反之...那樣簡單多了
你想做個檢索QQ群的
其他方法也是有的
但實現出來還是很難...
思路我還是有點的....

熱點內容
java的基本結構 發布:2024-10-11 15:12:24 瀏覽:730
大眾suv哪個內部配置好 發布:2024-10-11 14:30:39 瀏覽:93
緩存到資料庫失敗 發布:2024-10-11 14:27:44 瀏覽:678
我的世界手機國際怎麼創建伺服器 發布:2024-10-11 13:45:46 瀏覽:420
svnlinux命令 發布:2024-10-11 13:35:54 瀏覽:234
ig加密語音 發布:2024-10-11 12:19:25 瀏覽:487
釘圖上傳 發布:2024-10-11 12:11:27 瀏覽:479
腳本個 發布:2024-10-11 12:10:43 瀏覽:151
剛性攻絲的編程 發布:2024-10-11 12:10:39 瀏覽:469
怎麼登錄安卓版全民tv 發布:2024-10-11 12:10:33 瀏覽:624