Delphi XE5 不同平台使用 SSL/HTTPS

以前在 Delphi 使用 Tidhttp元件時，需要額外載入 OpenSSL的 dll。Delphi XE5開始支援多裝置、多平台的時候，該如何解決呢？

昨天在 Coderage 8時，Olaf Monien的分享，記錄下來避免忘記！不過文中提到Android目前似乎還沒有XD

連結:

Delphi XE5 : SSL / HTTPS on different platforms with TIdHTTP and TRESTClient

http://www.monien.net/delphi-xe5-ssl-https-on-different-platforms-with-tidhttp-and-trestclient/

Delphi XE LiveBindings連結MySQL中文亂碼問題

一直都嘗試用原來的寫法，沒試過LiveBindings的功能，昨天看到 CodeRage8的介紹後，今天嘗試一下，結果剛好遇到MySQL中文亂碼問題，一起分享。

Data Explorer

1打開Data Explorer，在MySQL按右鍵 >> Add New Connection

2新增名字

3輸入連線資訊

HostName >> 主機名稱

Database >> 資料庫名稱

User Name >> 帳號
Password >> 密碼

接著可以打開 Advanced看看裡面有什麼

4按OK完成

LiveBindings

1從上面的功能表點選 View -> LiveBindings Designer打開 LiveBindings Designer

2會看到下面多了一塊 LiveBindings Designer的畫面，接著按左下角的LiveBindings Wizard

3可以選擇Binding的方式，我們選第二個 Link a grid with a data source

4選擇TGrid

5選DBX(DBExpress)

6選擇 Driver: MySQL；Connection Name:POS(剛才Data Explorer建立的);Command Type: ctTable(連接Table);Command Text:下拉要連結的Table

7勾選 Add Data Source navigator，新增一個navigator

8完成後就會發現 LiveBinding都做好了XD 稍徵排版一下

9發現裡面的中文變成????怎麼辦?

10點選 TSQLConnection，在Driver裡面有一個 ServerCharSet設成big5，接著把上面的Connected勾掉再勾回去(重新連線)

11再回到TBindSourceDBX，一樣在Active的地方勾掉再勾回去重新連線

12亂碼的地方回復成中文了！

Delphi XE5 30天學習暫停五天

晚安！突然有網友來信問了怎麼停頓沒教了呢？其實不是沒有教啦～只是最近在忙著手上的專案。剛好手上在從事餐飲業的POS系統開發以及 Codeigniter 結合 bootstrap3的案子，這正好又可以寫一些文章分享了！

請大家耐心等候囉！

Day4 – Delphi XE5 簡易BMI計算器

今天教大家設計BMI計算機，

1首先開啟一個空白專案

2新增一個ListBox

3將aligh 設為 alClient(填滿)

4將GroupingKind 設成 gsGrouped

5將StyleLookup 設定 transparentlistboxstyle

6在畫面上按右鍵開啟 Items Editor

7下拉TListBoxGroupHeader後按Add Item

8接著下拉 TListBoxItem 後按 Add Item

9新增如上圖

10點上面的LiboxGroupHeader1修改Text 為 BMI計算機，TextAligh設為 taCenter(置中)

11陸續修改其他如上圖

12新增TEdit元件

13修改屬性Aligh 為 alRight

14將KeyboardType改成 vktNumberPad (預設開啟數字鍵盤)

15新增一個Button

16將Aligh 設為 alClient

17 Text設為計算

18新增Label

19設定完畫面如圖

20將edit1.text,edit2.text的TextAligh屬性設為 taTrailing (置右)

21都設定完之後，可以下拉成不同機器

22可以看得到在ios、android會自動轉換成各自的風格

23接著在畫面的計算按鈕點二下，輸入上圖的程式

[pascal]
procedure TForm1.Button1Click(Sender: TObject);
var
BMI:double;
begin
BMI := StrToFloat(FormatFloat(‘#.##’,(StrToFloat(Edit2.text) /
( (StrToFloat(Edit1.Text)/ 100) * (StrToFloat(Edit1.Text)/100 )))));
Label1.Text := FloatToStr(BMI);
end;
[/pascal]

24 可以雙點不同的平台，看看跑出來的效果

25 Windows

26 iPhone

27 Android

Github 程式下載 https://github.com/superlevin/delphixe5bmicalc

14種CSS線上產生器

border-image-generator

CSS3 Radius and Box Shadow

CSS Button Generator

CSS3 Gradient Generator

喜歡跟不喜歡的程式語言投票結果

來源:https://news.ycombinator.com/item?id=6527104

美國創投公司 Y Combinator針對喜歡跟不喜歡的程式語言投票結果

Delphi XE5 在 Windows跟Mobile(Android/iOS)字串處理方式不同

在Delphi XE5中開發移動裝置（Android/iOS）有不同的編譯器

iOS模擬器：DCCIOS32.EXE
iOS實　機：DCCIOSARM.EXE
Android ：DCCAARM.EXE

所以在開發時，有些資料型態是必需改寫的：

WideString, AnsiString, ShortString, AnsiChar, PAnsiChar, PWideChar, Openstring

而下面的表格有教您如何做對應處理。

接下來的是0-based跟1-based，以前的程式都是從1開始，在mobile complier上則是從0開始(文件上說以後可能會變成標準)。

官方建議是使用StringHelper、或StringBuilder來處理(例如Pos改成Indexof….)

參考資料

Migrating Delphi Code to Mobile from Desktop

Day3 – Delphi XE5簡易手電筒

在經過前二天的安裝以及設定之後，今天來教大家寫一個最簡單的app-手電筒。十分鐘就可以完成了唷 🙂

1新增空白專案

2接著我們要在畫面上放上二個元件，在右下角的元件盤中搜尋打上tswitch，這是一個開關的元件。直接在TSwitch快點二下

3第二個元件是TCameraComponent，從名稱就知道跟相機有關的，沒錯，因為手電筒就是打開相機的閃光燈。一樣也是搜尋到之後快點二下即可。

4二個元件放上去的畫面

5接下來點選畫面上的CameraComponent1元件，然後左下角的Active打勾成為 True

6接下來點選畫面上的Switch元件，然後將左下角的屬性視窗點Events頁籤，往下找到OnSwitch快點右邊空白處二下

7在裡面輸入以下的程式

[pascal]
if Switch1.IsChecked then begin
if CameraComponent1.HasFlash then
CameraComponent1.TorchMode := TTorchMode.tmModeOn;
end else begin
if CameraComponent1.HasFlash then
CameraComponent1.TorchMode := TTorchMode.tmModeOff;
end;
[/pascal]

稍微講解一下，如果Switch是打開的(Switch1.IsChecked)，檢查相機是不是有閃光燈(CameraComponent1.HasFlash)，確定有的話，就將相機的TorchMode(燈光)打開(tmModeOn)，相反的就是關掉(tmModeOff)。

打完收功！按下F9之後，就是您的第一個APP程式叫「手電筒」XD

範例程式碼下載: https://github.com/superlevin/delphixe5flashlight

實機操作畫面:

Day2 – Delphi XE5 開發Android、Mac/iOS設定

Android設定

1開始功能表→Embarcadero RAD Studio XE5→Android Tools

2開啟之後，其實就是Android SDK Manager的畫面

3點選上面功能表Tools→Manage AVDs就可以看到delphi xe5在安裝時會自動新增一個rsxe5_android模擬器

4如果您已安裝好自己android手機的usb驅動程式，可以進入命令字元模式(執行→cmd)，然後輸入 adb devices，如果正確的話就會列出您的手機。

Mac/iOS設定

1到apple網站下載xcode並安裝(網址 https://developer.apple.com/xcode/)

2安裝完成後，打開xcode，進入選單Preferences中安裝Command line tools

3將C:\Program Files\Embarcadero\RAD Studio\12.0\PAServer中的RADPAServerXE5.pkg複製到mac上安裝，完成後就會出現RAD PAServer XE5

測試設定是否成功

Android APP開發

1打開 delphi XE5主程式，點選 File -> New -> FireMoneky Mobile Application – Delphi 新增專案

2選擇blank application(空白專案)

3自動建立一個手機app的空白專案

4預設是執行到android上(粗體)，其他也可以直接執行在iOS的實機或模擬器上

5從右下角的Tool Palette(工具盤)，點一下TButton，再回到手機畫面的空白處拖拉出您要的大小

6再到左下角的Object Inspector(物件檢視器)，下拉到Text的部份，把Button1改成Hello World

7點開右邊的project1，把android下面target的部份設定成PC36100(壽山的HTC手機)，接著點選功能表的RUN→RUN(或直接按F9)

8實機拍攝的狀況

iOS APP開發

延續上面的1~6的步驟。

0在mac機器上打開paserver，並輸入密碼(一定要輸入)，並取得該主機的ip(可以打開終端機輸入ifconfig)

1在ios simlulator點二下變粗體後，按右鍵Properties在profile的地方下拉，按add new

2輸入設定檔名稱按下一步(next)

3輸入執行paserver的主機ip以及密碼，沒問題的話按test connection會出現成功訊息

4設定好後按finish，接著點ok，就可以按f9執行了

5模擬器執行畫面如上，恭禧您！已經學會iOS跟Android APP設計的第一步了。

系列文章

Day1 – Delphi XE5試用安裝

Day2 – Delphi XE5 開發Android、Mac/iOS設定

Day1 – Delphi XE5試用安裝

在接下來的30天裡，壽山要挑戰教大家利用Delphi XE5的30天Free Trials(試用版)，從delphi的門外漢，到可以設計Android、iOS程式的初學者。

首先，第一天先教大家如何申請試用版本以及安裝。

系統需求

記憶體:1 GB (2 GB以上更好)
硬碟空間: 需3-24 GB 的空間
光碟機(安裝程式用)
基本的GPU – Any vendor DirectX 9.0 class or better (Pixel Shader Level 2)
處理器: Intel® Pentium® or compatible, 1.6 GHz minimum (2GHz+ recommended)
顯示器:1024×768 or higher-resolution monitor
滑鼠:
系統版本:
- Microsoft® Windows 8 (32-bit and 64-bit)
- Microsoft® Windows 7 SP1 (32-bit and 64-bit)
- Microsoft® Windows Vista™ SP2 (32-bit and 64-bit) requires administrator rights
- Microsoft® Windows Server® 2008 (32-bit and 64-bit)