Delphi中debug版和release版两种配置编译选项

//(* 本文出处:南山古桃(nsgtao)的百度空间:http://hi.baidu.com/nsgtao/ *)

预编译
{$DEFINE TEST}


{$IFDEF TEST}
CODE........
{$ENDIF}
需要在调试的时候,
启用某些编译选项,启动莫些代码。
而在发给用户的时候,
启用另外一些编译选项,不使用某些代码。
有办法保存两个编译配置,方便的切换吗?

Delphi里如果想要设置某些标准只运行一部分代码,可以通过编译开关
{$IFDEF 开关值}
代码
{ENDIF}
这样在编译的时候,Project的options的condionals页面里输入开关值,编译出来的代码就有这一部分,否则没有

不需要定义的。。。用delphi内置的{$IFDEF DEBUG}
就行了,调试时,在project manager中设置项目为debug
正式发布了再改成release

举例如下:

//{$define test}      //有此句则运行ShowMessage('debug');注释后则不运行

procedure TForm1.Button1Click(Sender: TObject);
begin
{$ifdef test}
ShowMessage('debug');
{$endif}
button1.Caption := '南山';
end;

  • 0
    点赞
  • 1
    收藏
    觉得还不错? 一键收藏
  • 0
    评论

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值