Delphi春天將來臨，Android遇到XE7我也是醉了，Hello World

標籤：item   rms   present   app   comment   net   之間   graph   integer   

回首往日，從Delphi 7走到現在，總感覺不慍不火，期間論壇倒掉無數，沒倒掉的也半死不活，大批的程式員轉向C#，Java，PHP。

Delphi的開發高效有目共睹，一直不忍放棄，Delphi曾經一夜之間完成了固定資產的轉換程式，從Access資料匯入到MSSQL資料，那次的經曆是從下午6點開始編寫，中間除了吃飯和拉尿，一直坐到第二天早上10點，拍著胸脯答應客戶的事情終於辦到了，拷貝就用，使用也方便，不用像VB那樣需要掛很多運行庫。

前段時間以XE開發的一個積分制軟體結束後，也是花了大概2個月左右的業餘時間，工作完成放上網路後，真想為廣大的小企業員工開發一款查詢軟體。選擇開發平台之餘，發現了一個劃時代的重磅工具-Delphi XE7。

為什麼選擇XE7？很簡單，我會Delphi，高效，我不開發低層的東西，我只面向業務，有android，有iOS，有64位。對我來說已經集大成了。

好了，說了這麼多，開工了，我要為我的軟體再加上個手機應用，從那裡開始呢，當然是Demo，哈哈，你沒猜錯，Hello World。

裝完XE7，豁，好傢夥好大幾十個G，我的可憐的固態硬碟啊。安裝的朋友們注意了，至少騰出40G的空間。什麼，你還是XP，XP你就別再混了，都Win7了。

都說，裝完來一發吧，騷年！

好吧，開搞！

啟動程式，建立工程，這我不用講了把，選擇程式的時候，選Multi-Device-Application：

 

然後放上控制項，老三樣，Edit，button，listbox：

寫上代碼：

 

[delphi] view plain copy 

1. unit Unit1;  
2.   
3. interface  
4.   
5. uses  
6.   System.SysUtils, System.Types, System.UITypes, System.Classes, System.Variants,  
7.   FMX.Types, FMX.Controls, FMX.Forms, FMX.Graphics, FMX.Dialogs,  
8.   FMX.ListView.Types, FMX.ListView, FMX.StdCtrls, FMX.Controls.Presentation,  
9.   FMX.Edit, FMX.Layouts, FMX.ListBox;  
10.   
11. type  
12.   TForm1 = class(TForm)  
13.     Edit1: TEdit;  
14.     Button1: TButton;  
15.     ListBox1: TListBox;  
16.     procedure Button1Click(Sender: TObject);  
17.     procedure FormShow(Sender: TObject);  
18.   private  
19.     { Private declarations }  
20.     I: Integer;  
21.   public  
22.     { Public declarations }  
23.   end;  
24.   
25. var  
26.   Form1: TForm1;  
27.   
28. implementation  
29.   
30. {$R *.fmx}  
31.   
32. procedure TForm1.Button1Click(Sender: TObject);  
33. begin  
34.   ListBox1.Items.Add(Edit1.Text+‘(‘+IntToStr(I)+‘)!‘);  
35.   I := I+1;  
36. end;  
37.   
38. procedure TForm1.FormShow(Sender: TObject);  
39. begin  
40.   I:=0;  
41. end;  

最關鍵的一步別忘了，目前模擬器很渣，別想用模擬器了，走不通，直接插上手機，見笑，小米：

 

插上後選擇開發平台和手機，手機別忘了開啟開發模式，怎麼開，自己度娘去：

好了，直接運行吧，在安卓端，同意安裝，好了，程式工作了：

 

 

http://blog.csdn.net/TiggerKiller/article/details/41316517

Delphi春天將來臨，Android遇到XE7我也是醉了，Hello World