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. WHERE 子句用于规定选择的标准。

    WHERE 子句 如需有条件地从表中选取数据,可将 WHERE 子句添加到 SELECT 语句. 语法 SELECT 列名称 FROM 表名称 WHERE 列 运算符 值 下面的运算符可在 WHERE ...

  2. Red Hat系统安装Redis

    环境 RHLinux-6.4-64-EN, 红帽6.4 64位,英文正式公布版 安装 安装非常easy,先下载redis的压缩包,下载地址见这里.然后复制到你的linux机器.接着运行以下的命令. 1 ...

  3. VC++中CEdit控件实现回车换行

    1.通过回车Enter换行: 这里要有两个设置 <1>.将控件的属性设置为Mutilines->true; <2>.将控件的另一个属性设置为Want return-> ...

  4. 论坛模块__发帖时使用FCKeditor

    论坛模块__发帖时使用FCKeditor 测试 <html> <head> <meta http-equiv="content-type" conte ...

  5. Spring_day01--Spring的bean管理（xml方式）_属性注入介绍

    Spring的bean管理(xml方式) Bean实例化的方式 1 在spring里面通过配置文件 创建对象 2 bean实例化(创建对象)三种方式实现 第一种 使用类的无参数构造创建(重点) Use ...

  6. MD5加密算法全解析

    转自:http://blog.csdn.net/nzfxx/article/details/51804193 大家好,我们现在来讲解关于加密方面的知识,说到加密我认为不得不提MD5,因为这是一种特殊的 ...

  7. spring容器加载完毕做一件事情（利用ContextRefreshedEvent事件）

    关键字:spring容器加载完毕做一件事情(利用ContextRefreshedEvent事件) 应用场景:很多时候我们想要在某个类加载完毕时干某件事情,但是使用了spring管理对象,我们这个类引用 ...

  8. innerHTML 延后执行？

    时常会觉得 innerHTML 可能有延后执行的情况,比如下面代码: document.body.innerHTML = 'something'; alert('something else'); 明 ...

  9. navicat自动生成DDL语句

    场景:当我们在开发库修改表结构之后,需要把这些表结构的变化同步更新到生产库,这时候可以在Navicat中copy表结构变更的SQL语句. 当你点击了“设计表”进行修改表结构,在保存表结构之前点击“SQ ...

  10. Ubuntu 中 apache 开启 rewrite 模块

    ubuntu14.04中安装好apache2.4之后默认rewrite模块是不开启的,项目public目录下的.htaccess文件就用不了,在浏览器中访问网页总是报500错误,原因就是这个. 执行下 ...