7

次のスニペットを検討してください。

requires
  designide,
  rtl,
  vcl,
  {$IF RTLVersion < 19.0}            // E2026 Constant expression expected
  //{$IF CompilerVersion = 22.0}     // same as above
  vcljpg;
  {$ELSE}
  vclimg;
  {$IFEND}

構文的には完全に正しいようです。ただし、コンパイラはそれを窒息させ、報告しConstant expression expectedます。ここで実際に何が起こるのでしょうか?

技術: 現在、XE (15.0.3953.35171) のみでテストされています。

もちろん、回避策の提案も大歓迎です。

4

3 に答える 3

12

Delphi 2007でも同じ問題が過去に見つかりました。回避策として、条件定義を含むincファイルを使用し、{$IFDEF}代わりに使用します{$IF}

そのようなもの

{$I MyDefines.INC}


requires
  designide,
  rtl,
  vcl,
 {$IFDEF DELPHI_XE_UP} //the DELPHI_XE_UP is defineed inside of MyDefines.INC
  uNewlib;
 {$ELSE}
  uOldLib;
 {$ENDIF}
于 2011-11-29T04:25:28.647 に答える
8

packageprogramモジュールはandモジュールとは異なりlibraryます。それらには実行可能なコードが含まれておらず、useユニットを作成することはできません。したがって、 のような記号RTLVersionはパッケージ ファイルからは見えません。唯一のオプションは、を使用すること$IFDEFです。

于 2011-11-29T09:37:09.717 に答える
2

原因を見つけたばかりだと確信しています。次の点を考慮してください。

{$IF not Declared(RTLVersion)}
{$MESSAGE WARN 'There is no RTL'}
{$IFEND}
{$IF not Declared(CompilerVersion)}
{$MESSAGE WARN 'nor are compiler intrinsics at all'}
{$IFEND}
{$IF not Declared(System)}
{$MESSAGE ERROR 'Because package not uses System implicitly'}
{$IFEND}

したがって、コンパイラが正しく動作するように見えますが、問題のシンボルが実際には宣言されていないのに、シンボルが定数式ではないというかなり誤解を招く (誤っていない場合) メッセージを発行します。

于 2011-11-29T05:08:50.783 に答える