Delphi APP 開發入門(四)簡易手電筒

时间:2021-07-15 20:14:05

Delphi APP 開發入門(四)簡易手電筒

閲讀次數:3297 發表時間:2014/05/30

上週教各位製作簡易的計算機後,本週要繼續教大家製作簡易手電筒。讀者可能會發現,筆者在撰寫的前四篇文章中除了前二篇的安裝、設定後,後二篇都是簡易的APP教學。或許有朋友會想,如果APP開發都這麼簡單的話,那程式設計師不就都沒工作了?

呵呵~當然是這樣沒錯囉!之所以叫”Delphi APP開發入門”,主要是希望能夠引領更多對撰寫APP有興趣的朋友”入門”,正所謂「師父領進門,修行在個人」,所以筆者的想法是希望讓大家在最短的時間能夠擁有簡單的作品,進而產生興趣來學習才是最重要的!:)

廢話一堆後,繼續進入正題。

1新增FireMonkey Mobile Application

Delphi APP 開發入門(四)簡易手電筒

2選取Blank Application空白專案Delphi APP 開發入門(四)簡易手電筒

3在畫面上放二個元件,TCameraComponent及TSwitch

Delphi APP 開發入門(四)簡易手電筒 Delphi APP 開發入門(四)簡易手電筒

4畫面上可以看到Switch元件是簡體字,是由於XE6語系的問題,可以參考「switch元件簡繁體問題」這篇文章。

Delphi APP 開發入門(四)簡易手電筒

5接著點選Switch元件,切換到Events(事件)頁籤,我們要在OnSwitch事件中打開(或關閉)閃光燈。

Delphi APP 開發入門(四)簡易手電筒

6.輸入以上的程式碼,如果Switch是開啟(IsChecked)的話,先檢查相機元件是否有閃光燈(HasFlash),有的話則切換Torchon/Off。

Delphi APP 開發入門(四)簡易手電筒

然後又很簡單的我們完成了手電筒的APP了。經過了四週開心又簡單的入門教學後,大家對於利用Delphi XE6撰寫APP是不是有興趣了呢?接下來的教學文件,我們會慢慢的增加更多簡單有趣的APP,希望讓大家有更多自己的作品。