程式設計 – 第 33 頁 – Levin's Blog-林壽山的c# .net奇幻旅程

Delphi XE5 Firemonkey實作仿Flappy Bird遊戲

FMX Express 上看到的「Flappy Bird Clone Source Code For Delphi XE5 Firemonkey On Android And IOS」

Delphi XE5 Firemonkey Flappy Bird

有興趣研究Delphi XE5如何寫出Mobile遊戲的可以下載程式碼。

下載連結:
Download Flappy Firemonkey Prototype Source Code For Delphi XE5 Firemonkey.

Download Flappy Firemonkey 3D Prototype Source Code For Delphi XE5 Firemonkey 3D or download the Win32 binary.

Delphi XE5 Firemonkey Flappy Bird Clone

Windows下Dropbox+Git Server雲端管理您的程式碼(軟體篇)

1. Git for Windows (http://msysgit.github.io/)

2. tortoisegit (http://code.google.com/p/tortoisegit/)

3. Dropbox (https://www.dropbox.com)

Git是目前最多人使用的版本控制軟體，與中心式版本控制軟體subversion(svn)相比，Git因為是分散式版本控制，基本上不用太擔心會出事XD，每位開發人員在本機也會有一個可獨立作業的倉庫，不用擔心網路連線、也不受主線拘束。

目前網路上最有名的Git Server服務為GitHub，如果申請免費帳號就可以使用，當然條件是要將Repo開放出來！如果不開放的話就需要付費升級帳號，除此之外就是自己架設一個Git Server。

不過架設一個網路可存取的Git Server真的是太費時間，幸好有Dropbox的出現，讓我們可以透過雲端硬碟來架設自己的Git Server 。以下教大家操作～

一、申請Dropbox帳號、安裝DropBox

請見拙作「不可缺少的Dropbox雲端硬碟申請教學」

二、安裝Git for Windows

3接著安裝TortoiseGit

都安裝完了之後！我們在Dropbox目錄建立一個repositories的資料夾，接著在裡面再建立一個myproject的資料夾。

建立完後，在資料夾上按右鍵選擇git create repository here

因為我們工作目錄都要在本機，勾選Make it Bare。

所有的工作都必需透過Clone到本機才能作業～

建立完後就會看到這個訊息。

接著進入myproject的資料夾看到以下的目錄就代表建立成功了。

Metro Style初體驗

確認功能完整度後，開始一邊完善系統一邊調整介面了！這次採用是Metro Style的設計，Metro 的三大精神為Modern Design、International Typographic Style及Motion Design。

也讓我重新找Win8系統以及打開XBOX研究一番～目前POS系統有使用這樣概念設計的應該為中保的開店快手雲端POS跟育山資訊的大當家BB POS

Delphi XE5 for android與iOS Barcode Scanner範例

Jim McKeeth在Embarcadero展示的範例。

原始碼下載(source code) >> Download

閱讀全文〈Delphi XE5 for android與iOS Barcode Scanner範例〉

方式一：使用user_agent跟redirect
[php]
$this->load->library(‘user_agent’);
$this->load->helper(‘url’);
if ($this->agent->browser() == ‘Internet Explorer’ and $this->agent->version() <= 7)
redirect(‘/unsupported-browser’);
[/php]

方式二：使用 http://mobiledetect.net
[php]
$this -> load -> library(‘Mobile_Detect’);
$detect = new Mobile_Detect();
if ($detect->is(‘Chrome’) || $detect->is(‘iOS’)) {

}
[/php]

您心中不可缺少的Delphi Libraries是?

寫了Delphi多年，常常是有許多library是開新專案就會use進來的，避免重覆開發輪子的冏境。

Jim McKeeth 整理了一篇「Indispensable Delphi Libraries」，列出他不可缺少的Library。如果要筆者加上的話，大概是一些商用元件像TMS、Infopower這類的元件吧:)

Delphi仿POS系統設定按鈕拖曳更改排序

許多餐飲或是快餐POS系統都會提供拖曳去更改按鈕排序！
在Delphi可不可以做得到呢？當然是簡單的~

1)MouseDown事件加上
(sender as tbutton).BeginDrag(false);
2)DragOver事件加上
if source is TButton then
Accept:=true;
3)DragDrop事件加上 >> 互換對方的caption
if Sender is TButton then begin
TempCaption := TButton(Source).Caption;
TButton(Source).Caption := TButton(Sender).Caption;
TButton(Sender).Caption := TempCaption;
end;