首页 > > 程序设计 > delphi >

Delphi中预编译指令如何使用

2008-04-09 04:21:39来源：互联网阅读 ()

我的主页: http://www.tommstudio.com/

在Delphi中，也有与C相似的预编译指令，虽然该类指令只在当前的单个文件有效（也有可能是笔者未全面了解该类指令的真正用法），但是这一类指令对于进行多版本的制作工作（如从标准版中出学习版），确实有着相当不错的用途。

一．指令介绍：

1．DEFINE指令：
格式：{$DEFINE 名称}
说明：用于定义一个在当前单元有效的符号（Symbol）。定义了之后可以使用IF DEF和IFNDEF指令来判断该符号是否存在。

2．UNDEF指令：
格式：{$UNDEF 名称}
说明：用于取消一个在当前单元已经定义的符号（Symbol）。该指令和DEFINE配合使用。

3．IFDEF指令：
格式：{$IFDEF 名称}
说明：如果该指令后的名称已经定义，则编译该指令后直到{$ELSE}或{$ENDIF}之间的代码段。

4．IFNDEF指令：
格式：{$IFNDEF 名称}
说明：如果该指令后的名称没有定义，则编译该指令后直到{$ELSE}或{$ENDIF}之间的代码段。

5．IFOPT指令：
格式：{$IFOPT 开关}
说明：如果该指令后的开关已经设立，则编译该指令后直到{$ELSE}或{$ENDIF}之间的代码段。
举例：


{$IFOPT  R }  
Writeln(''''编译时打开范围检查开关'''');  
{$ENDIF}

6．ELSE指令：
格式：{$ELSE}
说明：通过判断前缀Ifxxx的条件式来确定该指令到{$ENDIF}之间的代码段是否应该被编译或者忽略掉。

7．ENDIF指令：
格式：{$ENDIF}
说明：和Ifxxx配合，指明条件预编译段源代码段的结束位置。

二．范例：

编写例子，通过预先定义不同的编译符号，进行不用代码段的编译工作。

1．新建一个Delphi项目，在Unit1单元的窗体上添加一个Button按钮。
2．编写程序如下：


unit  Unit1;  

interface  

uses  

Windows,  Messages,  SysUtils,  Classes,  Graphics,  Controls,  Forms,  Dialogs,  StdCtrls;  

type  
TForm1  =  class(TForm)  
Button1:  TButton;  
procedure  FormCreate(Sender:  TObject);  
procedure  Button1Click(Sender:  TObject);  
private  
{  Private  declarations  }  
public  
{  Public  declarations  }  
a  :  String;  
end;  

var  
Form1:  TForm1;  

implementation  

{$R  *.DFM}  

{$DEFINE  AAA}  //  定义行。  
 
procedure  TForm1.FormCreate(Sender:  TObject);  
begin  
  a  :=  ''''Other'''';  
  {$IFDEF  AAA}  
  a  :=  ''''AAA'''';  
  {$ENDIF}  
  {$IFDEF  BBB}  
  a  :=  ''''BBB'''';  
  {$ENDIF}  
end;  

procedure  TForm1.Button1Click(Sender:  TObject);  
begin  
  Caption  :=  a;  
end;  

end.  
{注：粗体字部分为输入的代码}

3．编译后运行，按下Button，则看到窗体标题栏显示“AAA”。程序编译了a := ’AAA’的语句。
4．改变定义行的程序段：

当改为


{$DEFINE  BBB}

时，再次编译运行，则看到窗体标题栏显示“BBB”。程序编译了a := ’BBB’的语句。

当取消定义行或改为

{$DEFINE NOTHING}

或其他名称时，再次编译运行，则看到窗体标题栏显示“Other”。程序只编译了

a := ''''Other''''的语句。

三．如何快速的制作和更改版本：

使用预编译指令，在制作同一个程序的多个版本时，只需找出各版本中有区别的单元，依次定义统一的版本符号（Symbol），然后在程序段中加入条件预编译指令，就可以在实际编译中取舍编译不同的程序部分，这样对于程序的规范性（定义统一的版本符号）和保密性（不同的版本编译不同的程序部分）有很好的作用。

标签：

版权申明：本站文章部分自网络，如有侵权，请联系：west999com@outlook.com
特别注意：本站所有转载文章言论不代表本站观点，本站所提供的摄影照片，插画，设计作品，如需使用，请与原作者联系，版权归原作者所有