zoukankan      html  css  js  c++  java
  • Delphi春天将来临,Android遇到XE7我也是醉了,Hello World

    回首往日,从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

  • 相关阅读:
    33.数组声明方式(var构造函数) 、检测数组类型、数组的属性(封装好的就一个length)、数组的方法
    31.this指向(写出调用链,找最近对象) this的默认绑定 隐式绑定 显示绑定(call(绑定对象) apply(绑定对象) 当括号内没放绑定对象的时候恢复默认绑定) bind
    31.
    30.函数作用域链 (GO AO 也叫词法作用域链)、 调用栈、调用栈涉及this绑定
    29.包装类(构造函数) 包装类作用及调用栈
    916. Word Subsets
    246. Strobogrammatic Number
    445. Add Two Numbers II
    2. Add Two Numbers
    341. Flatten Nested List Iterator
  • 原文地址:https://www.cnblogs.com/findumars/p/7854222.html
Copyright © 2011-2022 走看看