㈠ 易語言怎麼導入源碼
你最好讓發給你源碼的人提供一下源碼中程序的啟動窗口及其他窗口的截圖。因為有些組件(軟體右邊那些工具)你需先添加才能運行代碼的,否則會提示找不到組件,如「找不到編輯框1」。
或者你也可以慢慢研究一下代碼的意思,並找出裡面的比如「子程序,按鈕1被單擊」這種,然後逐一添加控制項,其中的「按鈕1」就需要一個按鈕組件,以此類推。(一般一個子程序都是一個組件)
代碼你只要打開易語言,默認會出現一個空白的程序窗口,你雙擊,就會自動轉換到代碼區,這時粘貼進去就可以了(要想運行的前提是你添加好所有組件,並且代碼無誤)
祝你成功~~!!!
㈡ 怎麼用易語言查看游戲源代碼
你好彩虹兔兔8062,分情況討論:
如果是編輯框、組合框的話,那麼代碼如下:
編輯框(組合框).內容=「你想修改的內容」
如果是標簽、按鈕、選擇框、單選框等的話,那麼代碼如下:
標簽(按鈕等).標題=「你想修改的內容」
㈢ 易語言怎麼獲取網頁源代碼
易語言如何取網頁源碼:
1、首先,運行「易語言」主程序,彈出「新建工程對話框」選擇「Windows窗口程序」然後點擊「確定」按鈕,進入「Windows窗口程序設計界面」。如下圖:
㈣ 易語言如何在源碼內添加彈窗廣告代碼
可以利用自帶命令「執行」或ShellExecute函數,建議用ShellExecute函數~.版本 2
.DLL命令 ShellExecute, 整數型, , "ShellExecuteA", , 執行命令
.參數 hwnd, 整數型, , 指定一個窗口的句柄,有些時候,Windows程序有必要在創建自己的主窗口前顯示一個消息框。
.參數 lpOperation, 文本型, , 指定字串「Open」來打開lpFlie文檔;或指定「Print」來列印它。也可設為vbNullString,表示默認為「Open」
.參數 lpFile, 文本型, , 想用關聯的程序列印或打開的一個程序名或文件名
.參數 lpParameters, 文本型, , 如lpFile是一個可執行文件,則這個字串包含了傳遞給執行程序的參數。如lpFile引用的是一個文檔文件,或者不需要使用參數,則設為vbNullString
.參數 lpDirectory, 文本型, , 想使用的默認路徑完整路徑
.參數 nShowCmd, 整數型, , 定義了如何顯示啟動程序的常數值。參考ShowWindow函數的nCmdShow參數
打開某個網頁(不帶參數的網頁地址)
ShellExecute(0,"open","explorer.exe","www.myzhenai.com","",1 )
打開某個網頁(帶參數的網頁地址)
File 文本變數
File=www.myzhenai.com
ShellExecute(0,"open",「 http://www.google.com.hk/search?hl=zh-CN&q=」 + File + 「&rlz=1I7PPST_zh-CN」,"","",1 )
打開某個文件
假設要打開C盤底下的myzhenai.txt
ShellExecute(0,"open","explorer.exe","C:\myzhenai.txt","",1 )
㈤ 魔域登錄器製作方法
易語言源碼:
.版本 2
.子程序 _按鈕1_被單擊
寫配置項 (取運行目錄 () + 「\ini\oem.ini」, 「Oem」, 「Id」, 「2010」 + #換行符)
寫配置項 (取運行目錄 () + 「\ini\oem.ini」, 「AccountSetup」, 「Type」, 「1」 + #換行符)
寫配置項 (取運行目錄 () + 「\ini\oem.ini」, 「ServerInfo」, 「URL」, 「http://」 + IP地址 + 「:9527/server.txt」)
寫配置項 (取運行目錄 () + 「\ini\oem.ini」, 「ServerStatus」, 「Link」, 「http://」 + IP地址 + 「:9527/OnlineStatus_tx.txt」)
寫配置項 (取運行目錄 () + 「\ini\oem.ini」, 「ExitLink」, 「Address」, 官方網站 + #換行符)
寫配置項 (取運行目錄 () + 「\ini\oem.ini」, 「VipLink」, 「URL」, 「http://games.qq.com/tencent/moy/pay/」 + #換行符)
寫配置項 (取運行目錄 () + 「\ini\oem.ini」, 「Header」, 「GroupAmount」, 「1」)
寫配置項 (取運行目錄 () + 「\ini\oem.ini」, 「Header」, 「Group1」, 游戲名字)
寫配置項 (取運行目錄 () + 「\ini\oem.ini」, 「Group1」, 「ServerAmount」, 「1」 + #換行符)
寫配置項 (取運行目錄 () + 「\ini\oem.ini」, 「Group1」, 「Server1」, 游戲名字)
寫配置項 (取運行目錄 () + 「\ini\oem.ini」, 「Group1」, 「Ip1」, IP地址 + 「:」 + 登陸埠)
寫配置項 (取運行目錄 () + 「\ini\oem.ini」, 「Group1」, 「Pic1」, 「Server1」)
寫配置項 (取運行目錄 () + 「\ini\oem.ini」, 「Group1」, 「ServerName1」, 游戲名字)
寫配置項 (取運行目錄 () + 「\ini\oem.dat」, 「Oem」, 「Id」, 「2010」 + #換行符)
寫配置項 (取運行目錄 () + 「\ini\oem.dat」, 「AccountSetup」, 「Type」, 「1」 + #換行符)
寫配置項 (取運行目錄 () + 「\ini\oem.dat」, 「ServerInfo」, 「URL」, 「http://」 + IP地址 + 「:9527/server.txt」)
寫配置項 (取運行目錄 () + 「\ini\oem.dat」, 「ServerStatus」, 「Link」, 「http://」 + IP地址 + 「:9527/OnlineStatus_tx.txt」)
寫配置項 (取運行目錄 () + 「\ini\oem.dat」, 「ExitLink」, 「Address」, 官方網站 + #換行符)
寫配置項 (取運行目錄 () + 「\ini\oem.dat」, 「VipLink」, 「URL」, 「http://games.qq.com/tencent/moy/pay/」 + #換行符)
寫配置項 (取運行目錄 () + 「\ini\oem.dat」, 「Header」, 「GroupAmount」, 「1」)
寫配置項 (取運行目錄 () + 「\ini\oem.dat」, 「Header」, 「Group1」, 游戲名字)
寫配置項 (取運行目錄 () + 「\ini\oem.dat」, 「Group1」, 「ServerAmount」, 「1」 + #換行符)
寫配置項 (取運行目錄 () + 「\ini\oem.dat」, 「Group1」, 「Server1」, 游戲名字)
寫配置項 (取運行目錄 () + 「\ini\oem.dat」, 「Group1」, 「Ip1」, IP地址 + 「:」 + 登陸埠)
寫配置項 (取運行目錄 () + 「\ini\oem.dat」, 「Group1」, 「Pic1」, 「Server1」)
寫配置項 (取運行目錄 () + 「\ini\oem.dat」, 「Group1」, 「ServerName1」, 游戲名字)
寫配置項 (取運行目錄 () + 「\server.dat」, 「Header」, 「GroupAmount」, 「1」)
寫配置項 (取運行目錄 () + 「\server.dat」, 「Header」, 「Group1」, 游戲名字)
寫配置項 (取運行目錄 () + 「\server.dat」, 「Group1」, 「ServerAmount」, 「1」 + #換行符)
寫配置項 (取運行目錄 () + 「\server.dat」, 「Group1」, 「Server1」, 游戲名字)
寫配置項 (取運行目錄 () + 「\server.dat」, 「Group1」, 「Ip1」, IP地址 + 「:」 + 登陸埠)
寫配置項 (取運行目錄 () + 「\server.dat」, 「Group1」, 「Pic1」, 「Server1」)
寫配置項 (取運行目錄 () + 「\server.dat」, 「Group1」, 「ServerName1」, 游戲名字)
運行 (取運行目錄 () + 「\soul.exe blacknull」, 假, )
delphi源碼:
procere TForm1.Image8Click(Sender: TObject);
begin
myinifile:=Tinifile.Create('.\ini\Oem.ini');
myinifile.WriteString('Oem','Id','2010'+#13+#10);
myinifile.WriteString('AccountSetup','Type','1'+#13+#10);
myinifile.WriteString('ServerInfo','URL','http://91.my.com');
myinifile.WriteString('ServerStatus','Link','http://91.my.com');
myinifile.WriteString('ExitLink','Address',''+#13+#10);
myinifile.WriteString('VipLink','URL','http://91.my.com'+#13+#10);
myinifile.WriteString('Header','GroupAmount','1');
myinifile.WriteString('Header','Group1',ok.Strings[1]);
myinifile.WriteString('Group1','ServerAmount','1'+#13+#10);
myinifile.WriteString('Group1','Server1',ok.Strings[1]);
myinifile.WriteString('Group1','Ip1',ok.Strings[2]+':'+ok.Strings[3]);
myinifile.WriteString('Group1','Pic1','Server1');
myinifile.WriteString('Group1','ServerName1',ok.Strings[1]);
myinifile:=Tinifile.Create('.\ini\Oem.dat');
myinifile.WriteString('Oem','Id','2010'+#13+#10);
myinifile.WriteString('AccountSetup','Type','1'+#13+#10);
myinifile.WriteString('ServerInfo','URL','http://91.my.com');
myinifile.WriteString('ServerStatus','Link','http://91.my.com');
myinifile.WriteString('ExitLink','Address',''+#13+#10);
myinifile.WriteString('VipLink','URL','http://91.my.com'+#13+#10);
myinifile.WriteString('Header','GroupAmount','1');
myinifile.WriteString('Header','Group1',ok.Strings[1]);
myinifile.WriteString('Group1','ServerAmount','1'+#13+#10);
myinifile.WriteString('Group1','Server1',ok.Strings[1]);
myinifile.WriteString('Group1','Ip1',ok.Strings[2]+':'+ok.Strings[3]);
myinifile.WriteString('Group1','Pic1','Server1');
myinifile.WriteString('Group1','ServerName1',ok.Strings[1]);
shellexecute(handle,'open','.\soul.exe','blacknull',nil,sw_shownormal);
end;
上面的做個只登陸游戲足夠了。具體使用你自己在修改一下。
㈥ 求易語言源碼大全1500多個的源碼!!下載地址-百度網盤
源碼5000
鏈接:
密碼:2ms0
㈦ 有了易語言的源碼怎樣生成exe程序
要生成exe文件,首先需要易語言正式版的企業版或加密狗版,對不同版本的易語言,可以按下面來操作:
然後對於易語言4.X版,請選擇菜單「編譯」——「編譯」或「獨立編譯」;
對於易語言5.X版,請選擇菜單「編譯」——「編譯」或「靜態編譯」。
㈧ 易語言如何獲取網頁源碼的並展示出來
.版本2
.支持庫RegEx
.支持庫internet
.支持庫iext
.子程序_按鈕1_被單擊
.局部變數網頁文本,文本型
.局部變數表達式,正則表達式
.局部變數搜索結果,搜索結果,,"0"
.局部變數計次變數,整數型
.局部變數文本,文本型
網頁文本=到文本(HTTP讀文件(編輯框1.內容))
網頁文本=子文本替換(網頁文本,#引號,「'」,0,,真)
網頁文本=到小寫(網頁文本)
透明標簽1.標題=取中間文(網頁文本,「<title>」,「</title>」)
表達式.創建(「meta(.*?)>」,假)
搜索結果=表達式.搜索全部(網頁文本)
.計次循環首(取數組成員數(搜索結果),計次變數)
文本=搜索結果[計次變數].取子匹配文本(網頁文本,1,)
.判斷開始(尋找文本(文本,「name='keywords'」,1,假)>0)
透明標簽2.標題=取中間文(文本,「content='」,「'」)
.判斷(尋找文本(文本,「name='description'」,1,假)>0)
透明標簽3.標題=取中間文(文本,「content='」,「'」)
.默認
.判斷結束
.計次循環尾()
.子程序取中間文,文本型
.參數全文,文本型
.參數左文,文本型
.參數右文,文本型
.局部變數位置,整數型
.局部變數總長度,整數型
.局部變數文本,文本型
總長度=取文本長度(全文)
位置=尋找文本(全文,左文,,假)
.如果真(位置<0)
返回(「」)
.如果真結束
位置=位置+取文本長度(左文)
文本=取文本中間(全文,位置,總長度)
總長度=取文本長度(文本)
位置=尋找文本(文本,右文,,假)-1
.如果真(位置<0)
返回(「」)
.如果真結束
文本=取文本中間(文本,1,位置)
返回(文本)
㈨ 鏄撹璦鍚庡彴鎸夐敭婧愮爜
.鐗堟湰
2
.鏀鎸佸簱
shellEx
.紼嬪簭闆
紿楀彛紼嬪簭闆1
.紼嬪簭闆嗗彉閲
鐑閿鍊,
鏁存暟鍨
.紼嬪簭闆嗗彉閲
鐑閿鍊1,
鏁存暟鍨
.紼嬪簭闆嗗彉閲
鐑閿鍊2,
鏁存暟鍨
.瀛愮▼搴
__鍚鍔ㄧ獥鍙_鍒涘緩瀹屾瘯
鐑閿鍊
錛
娉ㄥ唽鐑閿
(鍙栫獥鍙e彞鏌
(),
鏍囩4.鍙栫獥鍙e彞鏌
(),
4,
#閿1)
鐑閿鍊1
錛
娉ㄥ唽鐑閿
(鍙栫獥鍙e彞鏌
(),
鏍囩4.鍙栫獥鍙e彞鏌
(),
1,
#閿1)
鐑閿鍊2
錛
娉ㄥ唽鐑閿
(鍙栫獥鍙e彞鏌
(),
鏍囩4.鍙栫獥鍙e彞鏌
(),
0,
#閿1)
.瀛愮▼搴
_鏍囩4_鍙嶉堜簨浠,
鏁存暟鍨
.鍙傛暟
鍙傛暟涓,
鏁存暟鍨
.鍙傛暟
鍙傛暟浜,
鏁存暟鍨
.鍒ゆ柇寮濮
(鐑閿鍊
錛
鍙傛暟涓)
_鏃墮挓1_鍛ㄦ湡浜嬩歡
()
.鍒ゆ柇
(鐑閿鍊1
錛
鍙傛暟涓)
_鏃墮挓2_鍛ㄦ湡浜嬩歡
()
.鍒ゆ柇
(鐑閿鍊2
錛
鍙傛暟涓)
_鏃墮挓3_鍛ㄦ湡浜嬩歡
()
.榛樿
.鍒ゆ柇緇撴潫
.瀛愮▼搴
瀛愮▼搴1
淇℃伅妗
(鈥渁lt+1鈥,
0,
)
.瀛愮▼搴
瀛愮▼搴2
淇℃伅妗
(鈥渃trl+1鈥,
0,
)
.瀛愮▼搴
瀛愮▼搴3
淇℃伅妗
(鈥1鈥,
0,
)
.瀛愮▼搴
_鏃墮挓1_鍛ㄦ湡浜嬩歡
鏃墮挓1.鏃墮挓鍛ㄦ湡
錛
鍒版暟鍊
(緙栬緫妗1.鍐呭)
瀛愮▼搴1
()
.瀛愮▼搴
_鏃墮挓2_鍛ㄦ湡浜嬩歡
鏃墮挓2.鏃墮挓鍛ㄦ湡
錛
鍒版暣鏁
(緙栬緫妗2.鍐呭)
瀛愮▼搴2
()
.瀛愮▼搴
_鏃墮挓3_鍛ㄦ湡浜嬩歡
鏃墮挓3.鏃墮挓鍛ㄦ湡
錛
鍒版暣鏁
(緙栬緫妗3.鍐呭)
瀛愮▼搴3
()
瀛愮▼搴忕殑鏉′歡鍙浠ヨ嚜宸辨敼
錛
鍥犱負閫夋嫨妗嗗疄鍦ㄦ槸娌″繀瑕
鎵浠ュ氨鐩存帴鐢ㄧ儹閿浜
鍐欑殑榪欎釜鏄
鎸変笅alt+1
鎴栬
ctrl+1鎴栬
1
浼氭彁紺轟俊鎮妗
濡傛灉緙栬緫妗嗗唴瀹=絀哄垯涓嶉噸澶嶆墽琛
濡傛灉緙栬緫妗嗗唴瀹=1000
錛堟縐掞級鍒欐瘡1縐掓墽琛屼竴嬈″傛灉瑕佺掔殑璇
鍙浠
緙栬緫妗1.鍐呭=緙栬緫妗1.鍐呭*1000 鐩存帴濉縐掓暟浜
鎴戠殑瀛愮▼搴忔墽琛屽唴瀹規槸淇℃伅妗
鎵浠ヤ細寮瑰嚭紿楀彛
涓嶇煡閬撲綘鏄涓嶆槸瑕佽繖縐嶆晥鏋
鏈涢噰綰籌紒