灌水 - 我又「亂」寫程式了^^a"

魔術王子 · 2018-01-24, 06:51 PM

老實說,應該會是一個蠻無聊的程式,因為結合了螢幕保護程式和MP3播放功能
MP3播放功能,看字面就知道可以播放MP3的檔案,而螢幕保護程式呢?
其實無聊就在這,程式執行後可以按播放播放MP3(若有的話)
若沒播放,只要滑鼠一分鐘內沒移動,程式就會自動撥放MP3

就這樣

老規矩,下面是連結(MEGA還是不能用)

https://drive.google.com/file/d/1Ehn...ew?usp=sharing

ppp0600 · 2018-01-24, 09:23 PM

Not Found
Error 404

錯誤訊息

魔術王子 · 2018-01-24, 09:38 PM

引用:

作者: ppp0600

Not Found
Error 404

錯誤訊息

哪部分?

程式還是下載?

ppp0600 · 2018-01-24, 09:53 PM

引用:

作者: 魔術王子

哪部分?

程式還是下載?

下載，又恢復正常了，真奇怪

魔術王子 · 2018-01-24, 10:15 PM

剛剛測試有一個非常非常危險的Bug
就是若沒有任何播放檔案,就按"播放"程式會出現錯誤,只能以工作管理員強迫關閉
這部分明天改進,還有一點忘了說明,程式只會搜尋同一資料夾下的MP3播放檔案
這部分留給有興趣的人發揮

ppp0600 · 2018-01-24, 10:33 PM

引用:

作者: 魔術王子

剛剛測試有一個非常非常危險的Bug
就是若沒有任何播放檔案,就按"播放"程式會出現錯誤,只能以工作管理員強迫關閉
這部分明天改進,還有一點忘了說明,程式只會搜尋同一資料夾下的MP3播放檔案
這部分留給有興趣的人發揮

我有發現這兩個問題

mini · 2018-01-25, 09:04 AM

程式的防錯往往是費神的一部分 (不只要不崩潰還要繼續正常運行)
每次看魔王的程式碼都很簡潔
相形之下me的就很多...
有時候還真佩服地說~

瞬移行動＋ Ver1.5
看起來簡單但總行數都快達到2000行了...

(等功能整合完畢再釋出，趁機廣告一下

)

魔術王子 · 2018-01-25, 07:16 PM

引用:

作者: mini

程式的防錯往往是費神的一部分 (不只要不崩潰還要繼續正常運行)
每次看魔王的程式碼都很簡潔
相形之下me的就很多...
有時候還真佩服地說~

瞬移行動＋ Ver1.5
看起來簡單但總行數都快達到2000行了...

(等功能整合完畢再釋出，趁機廣告一下

)

哈~~小王子在寫程式和學習魔術方面都算是完美主義者,其他就很隨便
寫程式和學習魔術都是全力以赴,力求完美
其實這些程式在設計之初,也都是雜亂無比,等到完成後
再慢慢規劃,精簡程式碼
這次分享順便把最初版也放進去

https://drive.google.com/file/d/1Ehn...ew?usp=sharing

這版改變蠻大的,雖然沒有加入檔案按鈕,但可以用拖曳的方式將檔案加入,也可拖曳資料夾,程式會將資料夾內所有MP3加入
不過對Unicode可能會出問題,C++ Builder 6並沒有支援到

追加功能:
分成播放清單跟目錄清單,需從目錄清單挑選歌曲,才能撥放
若播放沒有歌曲,自動撥放時間到會自動將目錄清單歌曲加入播放清單
可以拖曳檔案到播放清單
可以拖曳資料夾,資料夾內檔案會加入播放清單

魔術王子 · 2018-01-25, 07:42 PM

播放時千萬別移除或清除清單,會產生裝置錯誤的訊息
只能以工作管理員強制關閉
明天會再修正這個bug,然後分享

魔術王子 · 2018-01-26, 07:24 PM

修改好了
https://drive.google.com/file/d/1Ehn...ew?usp=sharing

順便分享一下VB 2015的設計方式
https://drive.google.com/file/d/1Jtc...ew?usp=sharing
不過因為工具箱上面沒有元件,所以必須要自己加入,加入步驟是在工具箱上按滑鼠右鍵,選[選擇項目],到[COM]的頁面,將[Windows Media Player]選項打勾,就可以在工具箱最下面看到[Windows Media Player]的元件,不過編譯完後,必須要跟AxInterop.WMPLib.dll與Interop.WMPLib.dll放在一起,然後.NET要安裝4.5.2版,才能使用

另外這個是隨興設計的QRPlayer,播放影片用,但要用拖曳的方式
因為之前用的播放器若沒連網路,會跑很久才出來所以才會想寫這個Quick Run Player
https://drive.google.com/file/d/1lWJ...ew?usp=sharing

魔術王子 · 2018-02-02, 08:49 PM

https://drive.google.com/file/d/1FJe...ew?usp=sharing
這個程式跟上面的程式都是與播放跟螢幕保護程式有關
只不過上一個是時間一到就播放,而這個同樣有這個功能,但還增加了攔截螢幕保護程式發生的訊息
也就是說這個程式可以讓螢幕保護程式無法啟動
由於程式是攔截訊息,而系統訊息都是傳給作用中的視窗,所以程式執行時,一定要讓程式處於作用中,才有效果
今天試了結果播放是沒問題,但在開機啟動的程式碼,因為是採用別的程式,然後程式名稱忘了改,所以會無作用(但開機後還是會執行,只不過選項無法打勾)
另外之前的程式是先將檔案保存起來,所以不會再搜尋檔案,而這個程式是每撥放完一個音樂,就會再搜尋檔案,也因為為了測試這部分程式碼,原本該等候一分鐘(60000)的時間,改為5秒(5000),然後忘了改回來
程式執行後,會在NotifyIcon下出現一個圖示,可以在圖示上雙擊,或按右鍵
這些Bug下禮拜回修改,然後分享,目前算是程式設計經驗分享吧

魔術王子 · 2018-02-05, 06:36 PM

https://drive.google.com/file/d/1FJe...ew?usp=sharing
修改好了,有多加一個功能就是"定時關機"
所以程式有三個功能"暫停螢幕保護程式","閒置播放MP3","定時關機"

魔術王子 · 2018-02-05, 07:06 PM

引用:

作者: 魔術王子

https://drive.google.com/file/d/1FJe...ew?usp=sharing
修改好了,有多加一個功能就是"定時關機"
所以程式有三個功能"暫停螢幕保護程式","閒置播放MP3","定時關機"

又出錯了,關機部分被REMARK起來

只要將REMARK拿掉重新編譯就行了
明天再修正(關機應該不常用吧

)

魔術王子 · 2018-02-06, 07:12 PM

https://drive.google.com/file/d/1FJe...ew?usp=sharing
關機部分請小心測試,我就是測試時不小心執行到關機,才會remark起來

魔術王子 · 2018-02-07, 06:55 PM

今天又修正了一些錯誤就是忘了設計[播放]鈕的程式碼連結如下
https://drive.google.com/file/d/1FJe...ew?usp=sharing
另外今天也設計一個同樣功能,但不同模式的程式,連結如下
https://drive.google.com/file/d/1gFl...ew?usp=sharing

還有就是這兩個程式都可以在表單下面的狀態列上按滑鼠右鍵顯示功能表

2018-01-24, 06:51 PM	#1
魔術王子版區管理員榮譽勳章勳章總數11 UID - 115097 在線等級: 註冊日期: 2004-01-13 住址: 魔術學園文章: 3007 精華: 0 現金: 15048 金幣資產: 2678678 金幣	灌水 - 我又「亂」寫程式了^^a" 老實說,應該會是一個蠻無聊的程式,因為結合了螢幕保護程式和MP3播放功能 MP3播放功能,看字面就知道可以播放MP3的檔案,而螢幕保護程式呢? 其實無聊就在這,程式執行後可以按播放播放MP3(若有的話) 若沒播放,只要滑鼠一分鐘內沒移動,程式就會自動撥放MP3 就這樣老規矩,下面是連結(MEGA還是不能用) https://drive.google.com/file/d/1Ehn...ew?usp=sharing
	__________________ 『唸金母心咒：嗡。金母。悉地。吽。』持此咒者，可免一切瘟疫，一切瘟神抱頭四散。魔術就是欣賞神奇的效果如果魔術的秘密被破解了那魔術就失去欣賞的價值
	送花文章: 1536, 收花文章: 1557 篇, 收花: 3898 次

2018-01-24, 09:23 PM	#2 (permalink)
ppp0600 長老會員榮譽勳章勳章總數17 UID - 19602 在線等級: 註冊日期: 2002-12-30 住址: 混亂地獄文章: 10282 精華: 0 現金: 11 金幣資產: 232048408 金幣	Not Found Error 404 錯誤訊息

	送花文章: 26729, 收花文章: 7697 篇, 收花: 38400 次

2018-01-24, 10:15 PM	#5 (permalink)
魔術王子版區管理員榮譽勳章勳章總數11 UID - 115097 在線等級: 註冊日期: 2004-01-13 住址: 魔術學園文章: 3007 精華: 0 現金: 15048 金幣資產: 2678678 金幣	剛剛測試有一個非常非常危險的Bug 就是若沒有任何播放檔案,就按"播放"程式會出現錯誤,只能以工作管理員強迫關閉這部分明天改進,還有一點忘了說明,程式只會搜尋同一資料夾下的MP3播放檔案這部分留給有興趣的人發揮

	送花文章: 1536, 收花文章: 1557 篇, 收花: 3898 次

2018-01-25, 09:04 AM	#7 (permalink)
mini 管理版主榮譽勳章勳章總數17 UID - 4144 在線等級: 註冊日期: 2002-12-07 文章: 13361 精華: 0 現金: 26496 金幣資產: 3024406 金幣	程式的防錯往往是費神的一部分 (不只要不崩潰還要繼續正常運行) 每次看魔王的程式碼都很簡潔相形之下me的就很多... 有時候還真佩服地說~ 瞬移行動＋ Ver1.5 看起來簡單但總行數都快達到2000行了... (等功能整合完畢再釋出，趁機廣告一下 )

	送花文章: 2017, 收花文章: 8010 篇, 收花: 26819 次

2018-01-25, 07:42 PM	#9 (permalink)
魔術王子版區管理員榮譽勳章勳章總數11 UID - 115097 在線等級: 註冊日期: 2004-01-13 住址: 魔術學園文章: 3007 精華: 0 現金: 15048 金幣資產: 2678678 金幣	播放時千萬別移除或清除清單,會產生裝置錯誤的訊息只能以工作管理員強制關閉明天會再修正這個bug,然後分享

	送花文章: 1536, 收花文章: 1557 篇, 收花: 3898 次

2018-01-26, 07:24 PM	#10 (permalink)
魔術王子版區管理員榮譽勳章勳章總數11 UID - 115097 在線等級: 註冊日期: 2004-01-13 住址: 魔術學園文章: 3007 精華: 0 現金: 15048 金幣資產: 2678678 金幣	修改好了 https://drive.google.com/file/d/1Ehn...ew?usp=sharing 順便分享一下VB 2015的設計方式 https://drive.google.com/file/d/1Jtc...ew?usp=sharing 不過因為工具箱上面沒有元件,所以必須要自己加入,加入步驟是在工具箱上按滑鼠右鍵,選[選擇項目],到[COM]的頁面,將[Windows Media Player]選項打勾,就可以在工具箱最下面看到[Windows Media Player]的元件,不過編譯完後,必須要跟AxInterop.WMPLib.dll與Interop.WMPLib.dll放在一起,然後.NET要安裝4.5.2版,才能使用另外這個是隨興設計的QRPlayer,播放影片用,但要用拖曳的方式因為之前用的播放器若沒連網路,會跑很久才出來所以才會想寫這個Quick Run Player https://drive.google.com/file/d/1lWJ...ew?usp=sharing

	送花文章: 1536, 收花文章: 1557 篇, 收花: 3898 次

2018-02-02, 08:49 PM	#11 (permalink)
魔術王子版區管理員榮譽勳章勳章總數11 UID - 115097 在線等級: 註冊日期: 2004-01-13 住址: 魔術學園文章: 3007 精華: 0 現金: 15048 金幣資產: 2678678 金幣	https://drive.google.com/file/d/1FJe...ew?usp=sharing 這個程式跟上面的程式都是與播放跟螢幕保護程式有關只不過上一個是時間一到就播放,而這個同樣有這個功能,但還增加了攔截螢幕保護程式發生的訊息也就是說這個程式可以讓螢幕保護程式無法啟動由於程式是攔截訊息,而系統訊息都是傳給作用中的視窗,所以程式執行時,一定要讓程式處於作用中,才有效果今天試了結果播放是沒問題,但在開機啟動的程式碼,因為是採用別的程式,然後程式名稱忘了改,所以會無作用(但開機後還是會執行,只不過選項無法打勾) 另外之前的程式是先將檔案保存起來,所以不會再搜尋檔案,而這個程式是每撥放完一個音樂,就會再搜尋檔案,也因為為了測試這部分程式碼,原本該等候一分鐘(60000)的時間,改為5秒(5000),然後忘了改回來程式執行後,會在NotifyIcon下出現一個圖示,可以在圖示上雙擊,或按右鍵這些Bug下禮拜回修改,然後分享,目前算是程式設計經驗分享吧

	送花文章: 1536, 收花文章: 1557 篇, 收花: 3898 次

2018-02-05, 06:36 PM	#12 (permalink)
魔術王子版區管理員榮譽勳章勳章總數11 UID - 115097 在線等級: 註冊日期: 2004-01-13 住址: 魔術學園文章: 3007 精華: 0 現金: 15048 金幣資產: 2678678 金幣	https://drive.google.com/file/d/1FJe...ew?usp=sharing 修改好了,有多加一個功能就是"定時關機" 所以程式有三個功能"暫停螢幕保護程式","閒置播放MP3","定時關機"

	送花文章: 1536, 收花文章: 1557 篇, 收花: 3898 次

2018-02-06, 07:12 PM	#14 (permalink)
魔術王子版區管理員榮譽勳章勳章總數11 UID - 115097 在線等級: 註冊日期: 2004-01-13 住址: 魔術學園文章: 3007 精華: 0 現金: 15048 金幣資產: 2678678 金幣	https://drive.google.com/file/d/1FJe...ew?usp=sharing 關機部分請小心測試,我就是測試時不小心執行到關機,才會remark起來

	送花文章: 1536, 收花文章: 1557 篇, 收花: 3898 次

2018-02-07, 06:55 PM	#15 (permalink)
魔術王子版區管理員榮譽勳章勳章總數11 UID - 115097 在線等級: 註冊日期: 2004-01-13 住址: 魔術學園文章: 3007 精華: 0 現金: 15048 金幣資產: 2678678 金幣	今天又修正了一些錯誤就是忘了設計[播放]鈕的程式碼連結如下 https://drive.google.com/file/d/1FJe...ew?usp=sharing 另外今天也設計一個同樣功能,但不同模式的程式,連結如下 https://drive.google.com/file/d/1gFl...ew?usp=sharing 還有就是這兩個程式都可以在表單下面的狀態列上按滑鼠右鍵顯示功能表

	送花文章: 1536, 收花文章: 1557 篇, 收花: 3898 次