Delphi is coming in the spring. I am also drunk when I encounter XE7 in Android, Hello World and androidxe7.

Source: Internet
Author: User

Delphi is coming in the spring. I am also drunk when I encounter XE7 in Android, Hello World and androidxe7.

Looking back on the past, from Delphi 7 to the present, I always felt like I was not doing anything. During this period, the Forum fell countless times and I was not doing anything. A large number of programmers switched to C #, Java, and PHP.

Delphi's development was efficient and visible to all, and it never gave up. Delphi once completed the Conversion Program of Fixed Assets overnight, and imported the Access data to MSSQL data, which was written from six o'clock P.M, in addition to eating and pulling urine in the middle, I sat down until the next day, patted my chest and promised that the customer had finally done the task. Copy the task and use it conveniently, there is no need to mount many runtime libraries like VB.

Some time ago, it took about two months to complete the development of a credit card software developed by XE, I really want to develop a query software for the employees of small enterprises. After selecting the development platform, we found an epoch-making tool-Delphi XE7.

Why XE7? Very simple. I will use Delphi, which is efficient. I don't develop low-level things. I am only oriented to businesses, including android, iOS, and 64-bit. I have already achieved great success.

Well, after talking so much about it, I have to add a mobile app to my software. From there, it's a Demo, of course. Haha, You didn't guess wrong, hello World.

After XE7 and ghost are installed, good guy is so big as dozens of GB, my poor SSD. The installation friends noticed that at least 40 Gb space is made. What, you are still XP, XP, and you don't need to mix up again, all of them are Win7.

Let's talk about it. Let's get it done, cool!

Okay, start!

Start the program and create a project. I don't need to talk about this. When selecting a program, select Multi-Device-Application:



Put the control on it. For example, Edit, button, and listbox:


Write the Code:

unit Unit1;interfaceuses  System.SysUtils, System.Types, System.UITypes, System.Classes, System.Variants,  FMX.Types, FMX.Controls, FMX.Forms, FMX.Graphics, FMX.Dialogs,  FMX.ListView.Types, FMX.ListView, FMX.StdCtrls, FMX.Controls.Presentation,  FMX.Edit, FMX.Layouts, FMX.ListBox;type  TForm1 = class(TForm)    Edit1: TEdit;    Button1: TButton;    ListBox1: TListBox;    procedure Button1Click(Sender: TObject);    procedure FormShow(Sender: TObject);  private    { Private declarations }    I: Integer;  public    { Public declarations }  end;var  Form1: TForm1;implementation{$R *.fmx}procedure TForm1.Button1Click(Sender: TObject);begin  ListBox1.Items.Add(Edit1.Text+'('+IntToStr(I)+')!');  I := I+1;end;procedure TForm1.FormShow(Sender: TObject);begin  I:=0;end;

The most critical step is not to forget that the current simulator is very scum. Don't try to use the simulator. You can't get through it. Just plug in your phone and smile, Xiaomi:

After the plug-in, select the development platform and mobile phone. Don't forget to enable the development mode on the mobile phone. How can I enable the mode? Go to your mother:


Okay, run it directly. on Android, agree to install it. Okay, the program is working:



Related Article

Contact Us

The content source of this page is from Internet, which doesn't represent Alibaba Cloud's opinion; products and services mentioned on that page don't have any relationship with Alibaba Cloud. If the content of the page makes you feel confusing, please write us an email, we will handle the problem within 5 days after receiving your email.

If you find any instances of plagiarism from the community, please send an email to: info-contact@alibabacloud.com and provide relevant evidence. A staff member will contact you within 5 working days.

A Free Trial That Lets You Build Big!

Start building with 50+ products and up to 12 months usage for Elastic Compute Service

  • Sales Support

    1 on 1 presale consultation

  • After-Sales Support

    24/7 Technical Support 6 Free Tickets per Quarter Faster Response

  • Alibaba Cloud offers highly flexible support services tailored to meet your exact needs.