delphi中{$DEFINE}的理解

最新推荐文章于 2012-04-07 16:28:26 发布

lixianxiang

最新推荐文章于 2012-04-07 16:28:26 发布

阅读量2.5k

点赞数

分类专栏： Delphi 文章标签： delphi user

本文链接：https://blog.csdn.net/lixianxiang/article/details/3725930

版权

Delphi 专栏收录该内容

7 篇文章 0 订阅

订阅专栏

// 當你開發及DEBUG時，將REMARK(//) 移除
// {$DEFINE SPECIFIC_USER }
const TEST_USERID = 'sfc';
const TEST_USERPASSWORD = 'sfccfs';
.......

這里，{$DEFINE SPECIFIC_USER }跟
const TEST_USERID = 'sfc';
const TEST_USERPASSWORD = 'sfccfs';
.......
沒有關系，
{$DEFINE SPECIFIC_USER }只是表示定義一個編譯開關。
下面
ParamByName('USERID').AsString := ParamStr(3);
{$IFDEF SPECIFIC_USER }
ParamByName('USERID').AsString := TEST_USERID;
ParamByName('PASSWORD').AsString := 'xxx';
{$ENDIF}
如果SPECIFIC_USER 有，即申明了{$DEFINE SPECIFIC_USER }，
則會執行
ParamByName('USERID').AsString := TEST_USERID;
ParamByName('PASSWORD').AsString := 'xxx';
如果沒有申明，則不會執行
ParamByName('USERID').AsString := TEST_USERID;
ParamByName('PASSWORD').AsString := 'xxx';
它與時候有const TEST_USERID = 'sfc';無關.
{IFDEF XXX}
{ENDIF}
必須成對出現