前幾天把在公司與同事團購的無線鍵盤拿回家用，雖然鍵盤品質不錯，手感又佳，可是還是保留了無線鍵盤的傳統特色『沒有燈號』。
才開始用不久，就因為沒燈號覺得障礙重重，因此著手寫了一個陽春型的鍵盤燈號顯示與控制軟體。
軟體功能與畫面：

1. 程式啟動時，預設會在主螢幕的右下角。
2. 程式永遠最上層。
3. 可切換黑，白兩種面板。
4. 可以滑鼠點擊燈號控制Num Lock、Caps Lock、Scroll Lock的開關。
5. 沒有使用Tray-Icon，因為我的Icon區已經滿滿的。
6. 沒有使用hook。

壓縮檔內含有Delphi 7 SourceCode

附加檔案：4b8bd08eaee05_鍵盤燈號.rar

編輯記錄

謝謝分享，這個的確很棒，尤其是筆電沒有number燈，都要按兩次確定到底是開還是關。

 Unicode中文檔名，無法下載！
請檢查→謝謝。

------
Andy Chang

很抱歉！太久沒上來。
檔案已經更新，我試過可以下載了。

樓主的保固服務實在太好啦

謝謝分享喲！


===================引 用 lcjan 文 章===================
很抱歉！太久沒上來。
檔案已經更新，我試過可以下載了。

感謝您的作品 .
這功能很棒 , 現在得確有很多鍵盤沒有提供燈號 .

但使用這個工具會發生無法常駐在我們目前的窗 .
會一直將此工具為最上層的情況 .
這樣會造成使用瀏覽器時 , 用滑鼠中間的滾輪無法正常運作 .

不知是否有更好的方式 可以將這個問題排除呢 謝謝 .

小弟試用了一下，未發生您的問題：
Win 7 Pro x64 TW，IE 11 (KB2977629)。

===================引 用 cavy9999 文 章===================
....
這樣會造成使用瀏覽器時 , 用滑鼠中間的滾輪無法正常運作 .
....

我很快的看了一下源碼。我想問題應該是timer每 50 ms 就會執行BringToFront，因而依我的經驗可能會造成「在它上面的程式一時間失焦」，對於左或右鍵的mouse是不會有差別，因為點了一下，就會得到焦點。但你用了中鍵，所以沒能再次對焦在你要的程式上。於是mouse中鍵事件都被這個程式吃下去了。



===================引 用 cavy9999 文 章===================
感謝您的作品 .
這功能很棒 , 現在得確有很多鍵盤沒有提供燈號 .

但使用這個工具會發生無法常駐在我們目前的窗 .
會一直將此工具為最上層的情況 .
這樣會造成使用瀏覽器時 , 用滑鼠中間的滾輪無法正常運作 .

不知是否有更好的方式 可以將這個問題排除呢 謝謝 .

------


蕭沖
--All ideas are worthless unless implemented--

C++ Builder Delphi Taiwan G+ 社群
http://bit.ly/cbtaiwan

編輯記錄

沒時間細看，但原則上應該可以用

SetWindowPos(Self.Handle, HWND_TOPMOST, 0, 0, 0, 0, SWP_NOSIZE or SWP_NOMOVE or SWP_NOACTIVATE);

讓它永遠在上面才是。而且只要在必要的情形下叫一次即可。

有時間的人或許可以幫忙一下，或是你自測。 不過，我不保證喔，因我大概只看了程式3分鐘而已… :p


===================引 用 aftcast 文 章===================
我很快的看了一下源碼。我想問題應該是timer每 50 ms 就會執行BringToFront，因而依我的經驗可能會造成「在它上面的程式一時間失焦」，對於左或右鍵的mouse是不會有差別，因為點了一下，就會得到焦點。但你用了中鍵，所以沒能再次對焦在你要的程式上。於是mouse中鍵事件都被這個程式吃下去了。

------


蕭沖
--All ideas are worthless unless implemented--

C++ Builder Delphi Taiwan G+ 社群
http://bit.ly/cbtaiwan