volcanol的工控博客

　　对于Windows下的控制台编程，我相信很多人都不陌生。而C语言开始的著名的“Hello world”程序基本是学习编程的第一步。我想对于

RAD开发，大家熟悉的一般都是GUI编程，而对于console的编程基本很少用到。其实对于Delphi而言，不但可以开发GUI程序，而且也可以

开发console程序。

　　为什么要提到控制台程序呢，因为通过控制台程序你可以清晰的了解到一种编程语言运行的基本原理。Delphi也开发一样，我们不单单是

要知道点几下鼠标就能设置图形界面，但是程序运行的过程和基本原理还是一知半解，说不懂也不是，说完全掌握也不是；因此这里我想开始

一系列Delphi的随笔记录，记录自己的学习历程。

　　以前也写过一段时间的Delphi随笔，但是没有坚持下去，这一次算是对自己一个严格要求吧，锻炼自己的恒心和毅力，决定写出一个完整的

系列文章，不再半途而废。因此将以前写的随笔全部备份，然后全部删除啦。以后打包给出一个链接吧，也许能帮助一些人，也许一点用没有，纯

粹浪费社会资源而已， 至于到底会怎么样，现在也不管啦，总之做就是啦................。

　　这里我们简单介绍一下怎样利用Delphi开发一个console程序。开篇之作就做以下基本的Delphi IDE的操作介绍，后面就不再做介绍啦。

这里的所有代码均基于Delphi 2010开始，后续的版本同样适用。

　　一、 建立控制台工程

1、建立工程， 打开Delphi IDE，然后如下图操作。

2、选择应用程序类型

　　如上图所示，选择 Console Application， 然后点击OK按钮。

3、出现如下IDE默认建立的应用程序模板

4、点击 Save 按钮，出现保持应用程序对话框，如下图所示

注意这里的名字，是应用程序的名字同时也是工程的名字， 这里修改后后，请注意IDE代码编辑器中的第一行代码的变化。

5、保存完后的项目/工程

6、到此一个简单的console应用程序工程已经建立完毕，只要一点调试工具按钮就可以看到一个一闪而过的命令行界面。

如果要看到运行的结果，请复制下面的代码到代码编辑窗口即可，具体内容在代码中会有解释。

　　二  修改后的控制台Hello World程序

{
    Delphi版 Hello World
}

{
    第一种注释风格    多行注释
}

(*
    第二种注释风格    多行注释
*)

// C++注释风格， 单行注释

{   Delphi程序结构
1、Delphi程序由一个工程文件 *.dpr 文件 + 0个或多个单元文件 *.pas 文件组成
2、工程文件是Delphi程序执行的入口点
3、工程文件由以下几部分组成
        程序头部分      program关键字
        Uses子句部分    uses关键字
        主程序块        begin与end关键字
4、IDE环境开发程序必须有一个工程文件，如果用命令行编译则不需要工程文件
5、工程文件用来组织所有相关的文件
6、工程文件的文件名将是可执行程序的文件名
}

{   程序头
1、程序头指示程序的开始，程序头标识符就是程序名
2、程序头的定义方式为：  program 程序头标识符
3、控制台程序的程序头标识符和工程文件 *.dpr 的文件名可以不一样，但是
   GUI程序则必须一样
}
program HelloWorld;    //指定程序名为 Helloworld

(*   编译指令
1、在Delphi程序中由编译指令来限定编译器的行为
2、编译指令通常由 {$ 和 } 符号对来表示
3、下面的编译指令表示现在开发的是一个 控制台 程序
*)
{$APPTYPE CONSOLE}

{   uses子句
1、uses子句必须在program程序头后面，紧跟编译指令
2、uses子句表示在程序中要引用的单元文件，有点类似C语言中的#include指令
3、uses子句可以用 in 关键字， 具体例子后续介绍
4、uses子句的语法:   uses
                         引用的单元文件名列表;
                     单元文件名列表用逗号 , 分隔，然后最后用分号结束 ;
}
uses
  SysUtils;

{   主程序块
1、主程序块用 begin 关键字标识，从 begin 开始，一直到 end. 结束
2、注意主程序块的结束标识是 end 关键字后面加上一个点号 .  且end和点号之间
   不能有空白符号
3、程序的主要执行代码在主程序块中编写
4、程序的执行从主程序块 begin 关键字后的第一条语句开始，到 end. 结束
}
begin
{
    下面用(* 和 *) 注释的内容是Delphi自动添加的代码，以后介绍
}
(*
  try
    { TODO -oUser -cConsole Main : Insert code here }
  except
    on E: Exception do
      Writeln(E.ClassName, ': ', E.Message);
  end;
*)

    {
        程序执行代码的开始
    }

    {
    1、writeln过程相当于C语言中的printf()函数，用于输出信息
    2、字符串字面值，在Delphi中利用双单引号表示
    }
    writeln('Hello world');

    {
    1、readln过程相当于C语言中的getch()函数，用于读取输入
    2、readln读入的是字符流
    }
    readln;

{   主程序块结束
1、end. 表示主程序块的结束
}
end.

　　后面系列文章除非常特殊的情况将不再对IDE环境进行说明。

      本系列文章欢迎转载，转载请注明来源。