Delphi_01_控制台版HelloWorld


  對於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環境進行說明。

      本系列文章歡迎轉載,轉載請注明來源。


注意!

本站转载的文章为个人学习借鉴使用,本站对版权不负任何法律责任。如果侵犯了您的隐私权益,请联系我们删除。



 
粤ICP备14056181号  © 2014-2021 ITdaan.com