首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > .NET > .NET >

怎么不执行代码中部分语句

2013-07-04 
如何不执行代码中部分语句?比如试用版中不编译正式版中的部分代码,或者加上日期限制。怎么才能达到这样的效

如何不执行代码中部分语句?
比如试用版中不编译正式版中的部分代码,或者加上日期限制。怎么才能达到这样的效果呢?而且需要越方便越好。用两套代码处理太麻烦,而且不容易统一,请高手指点。
[解决办法]
就用编译条件啊 你搜索一下  这个很简单的
比如  试用版条件为debug  正式为Release
{$ifdefine Release}
{$endif} 
[解决办法]
例子:

var
  Form1: TForm1;

implementation

{$R *.dfm}

//目前是试用版,若要正式版时,编译前将下一句左边的"//" 去掉即可
//{$DEFINE Release}

procedure TForm1.Button1Click(Sender: TObject);
begin
{$IFDEF Release}
  showmessage('正式版');
{$ELSE}
  showmessage('试用版');
{$ENDIF}
end;

end.

热点排行