Delphi APP 開發入門（四）簡易手電筒

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

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

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

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

1新增FireMonkey Mobile Application

2選取Blank Application空白專案

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

 

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

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

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

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

Delphi APP 開發入門（四）簡易手電筒的更多相关文章

  1. Delphi APP 開發入門（三）簡易計算機

    Delphi APP 開發入門(三)簡易計算機 分享: Share on facebookShare on twitterShare on google_plusone_share   閲讀次數:68 ...

  2. Delphi APP 開發入門（五）GPS 定位功能

    Delphi APP 開發入門(五)GPS 定位功能 分享: Share on facebookShare on twitterShare on google_plusone_share   閲讀次數 ...

  3. Delphi APP 開發入門（八）SQLite資料庫

    Delphi APP 開發入門(八)SQLite資料庫 分享: Share on facebookShare on twitterShare on google_plusone_share   閲讀次 ...

  4. Delphi APP 開發入門（六）Object Pascal 語法初探

    Delphi APP 開發入門(六)Object Pascal 語法初探 分享: Share on facebookShare on twitterShare on google_plusone_sh ...

  5. Delphi APP 開發入門（十）REST Client 開發

    Delphi APP 開發入門(十)REST Client 開發 分享: Share on facebookShare on twitterShare on google_plusone_share ...

  6. Delphi APP 開發入門（九）拍照與分享

    Delphi APP 開發入門(九)拍照與分享 分享: Share on facebookShare on twitterShare on google_plusone_share   閲讀次數:30 ...

  7. Delphi APP 開發入門（七）通知與雲端推播

    Delphi APP 開發入門(七)通知與雲端推播 分享: Share on facebookShare on twitterShare on google_plusone_share   閲讀次數: ...

  8. Delphi APP 開發入門（一）重生的 Delphi

    Delphi APP 開發入門(一)重生的 Delphi 分享: Share on facebookShare on twitterShare on google_plusone_share   閲讀 ...

  9. Delphi APP 開發入門（二）Android/iOS設定，Hello World

    Delphi APP 開發入門(二)Android/iOS設定,Hello World 分享: Share on facebookShare on twitterShare on google_plu ...

随机推荐

  1. php -- php的事务处理

    MYSQL的事务处理主要有两种方法. 1.用begin,rollback,commit来实现 begin 开始一个事务 rollback 事务回滚 commit 事务确认 2.直接用set来改变mys ...

  2. nginx php文件上传的大小配置问题

  3. 手机游戏运营主要的指标是什么？ 7天活跃， 14天活跃 ARPU ？如何提升游戏 app 的虚拟道具的收入？

    数据采集越细,手段越丰富,所获得的数据也就更加详实,虽然手机游戏没有网游那么复杂,但也需要数据化运营,而且是必要的,是优化游戏收入的关键,大家最主要关心的是下面三类数据的指标 1. 用户数量首先,在移 ...

  4. python 获取网页编码格式

    f = urllib2.urlopen(url,timeout=10)data = f.read()    # decode the htmlcontentType = f.headers.get(' ...

  5. C++之异常处理

     C++ Code  12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849 ...

  6. 关于CentOS系统中，文件权限第11位上是一个点的解读

    http://blog.csdn.net/dashuai03091199/article/details/38920833 http://blog.csdn.net/xinlongabc/articl ...

  7. 编程之美 set 18 拈两堆石子游戏(3)

    题目 假设有两堆石头, 有两个玩家按照如下规则轮流取石头 每个人每次可以从两堆石头中取出数量相等的石头, 或者仅从一堆石头中取出任意数量的石头 最后把剩下的石头依次拿光的人取胜 首先取石头的人能否赢得 ...

  8. C语言跳出循环

    使用while或for循环时,如果想提前结束循环(在不满足结束条件的情况下结束循环),可以使用break或continue关键字. break关键字 在<C语言switch语句>一节中,我 ...

  9. 如何把IOS应用，发给别人测试？

    ios应用,除了用XCODE连接真实设备调试以外,也可以制作ipa安包,发给别人测试.下面是具体步骤: 1. 把要测试的设备标识添加到你苹果开发账号的调试设备里.(可以用xcode或者itools查看 ...

  10. 离线微博工具Open Live Writer（Windows Live Writer）安装过程及server error 500错误解决

    必备条件: .net framework 3.5框架(大概是要求3.5或以上,不确定,好像没有人遇到和这个相关的问题) 2017年7月27日最新官方版0.6.2英文离线客户端网盘下载(官网的安装包无法 ...