Delphi Spring will come, Android encounter XE7 I was also drunk, Hello world

Source: Internet
Author: User

Looking back on the past, from the Delphi 7 to the present, the total feeling is not get mad bland, during the forum poured out countless, did not fall dead, a large number of programmers turned to c#,java,php.

Delphi's development and efficient to all, has not bear to give up, Delphi has completed the conversion of fixed assets overnight, from Access data import to MSSQL data, the experience was written from 6 o'clock in the afternoon, in addition to eating and urine, sitting until the next morning 10 points, Patted the chest to accept the customer's things finally done, copy on, use also convenient, do not like VB need to hang a lot of running library.

The previous time with XE developed a integration software after the end, but also spent about 2 months of spare time, work completed put on the network, really want to develop a query software for the majority of small business staff. Choose the development platform, found an epoch-making heavyweight tool-delphi XE7.

Why Choose XE7? Very simple, I will Delphi, efficient, I do not develop low-level things, I only business-oriented, have Android, have iOS, there are 64 bit. It's been a very important thing for me.

Well, said so much, started, I want to add a mobile app for my software, from there, of course, is the demo, haha, you have not guessed wrong, Hello world.

Loaded XE7, exempt, good guy, big dozens of g, my poor solid-state drive AH. The installed friends noticed that at least 40G of space was released. What, you still xp,xp you don't mix, all Win7.

All say, put the end of a bar, Sao years!

All right, open up!

Start the program, the new project, I don't have to talk about, select the program, choose Multi-device-application:

Then put on the controls, Third Kind, Edit,button,listbox:

Write the code:

[Delphi]View PlainCopy
  1. Unit Unit1;
  2. Interface
  3. Uses
  4. System. Sysutils, System. Types, System. Uitypes, System. Classes, System. Variants,
  5. FMX. Types, FMX. Controls, FMX. Forms, FMX. Graphics, FMX. Dialogs,
  6. FMX. ListView. Types, FMX. ListView, FMX. Stdctrls, FMX. Controls. Presentation,
  7. FMX. Edit, FMX. Layouts, FMX.  ListBox;
  8. Type
  9. TForm1 = Class (Tform)
  10. Edit1:tedit;
  11. Button1:tbutton;
  12. Listbox1:tlistbox;
  13. procedure Button1Click (sender:tobject);
  14. procedure Formshow (sender:tobject);
  15. Private
  16. {Private declarations}
  17. I:integer;
  18. Public
  19. {public declarations}
  20. end;
  21. Var
  22. Form1:tform1;
  23. Implementation
  24. {$R *.FMX}
  25. Procedure TForm1.  Button1Click (Sender:tobject);
  26. Begin
  27. ListBox1. Items. ADD (Edit1.  text+' (' +inttostr (I) +')! ');
  28. I: = i+1;
  29. End
  30. Procedure TForm1.  Formshow (Sender:tobject);
  31. Begin
  32. i:=0;
  33. End


The most critical step do not forget, the current simulator is very slag, do not want to use the simulator, do not go through, directly plug in mobile phones, laughed at, Millet:

Plug in the choice of development platform and mobile phone, mobile phone do not forget to open the development mode, how to open, their own Niang go:

Well, run it directly, in Android, agree to install, OK, the program worked:

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

Delphi Spring will come, Android encounter XE7 I was also drunk, Hello world

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.