outbar.inc

来自「XP风格的outbar.rar.有DELPHI,C++BULIDER的例子及源码」· INC 代码 · 共 83 行

{$O+,A+,W-,R-,Q-,B-,X+,T-,P+,H+,J+,C-}


{$IFDEF VER93}
{$DEFINE BCB}
{$DEFINE CPB1}
{$ENDIF}

{$IFNDEF VER80}
 {$IFNDEF VER90}
  {$IFNDEF VER93}
    {$IFDEF VER110}
      {$DEFINE CPB3} { C++ Builder 3.0 or higher}
    {$ENDIF}
    {$DEFINE D3} { Delphi 3.0 or higher }
  {$ENDIF}
 {$ENDIF}
{$ENDIF}

{$IFDEF VER120}
  {$DEFINE D4}
  {$DEFINE D3}
  {$DEFINE CPB3}
{$ENDIF}

{$IFDEF VER125}
{$DEFINE CPB4}
{$DEFINE D4}
{$DEFINE D3}
{$DEFINE CPB3}
{$ENDIF}

{$IFDEF VER130}
{$DEFINE CPB4}
{$DEFINE D4}
{$DEFINE D3}
{$DEFINE CPB3}
{$DEFINE D5}
{$ENDIF}

{$IFDEF VER140}
{$DEFINE CPB4}
{$DEFINE D4}
{$DEFINE D3}
{$DEFINE CPB3}
{$DEFINE D5}
{$DEFINE D6}
{$IFDEF BCB}  
{$DEFINE CPB6}
{$ENDIF}
{$ENDIF}

{$IFDEF VER150}
{$DEFINE CPB3}
{$DEFINE CPB4}
{$DEFINE CPB5}
{$DEFINE CPB6}
{$DEFINE D3}
{$DEFINE D4}
{$DEFINE D5}
{$DEFINE D6}
{$DEFINE D7}
{$ENDIF}


{$IFDEF CPB6}
{$DEFINE C6}
{$ENDIF}

{$IFDEF DEMO}
{$D-,L-,Y-}
{$ENDIF}

////  --  D7 added ///
{$IFDEF D7}
{$WARN UNSAFE_CODE OFF}
{$WARN UNSAFE_TYPE OFF}
{$WARN UNSAFE_CAST OFF}
{$WARN SYMBOL_DEPRECATED OFF}
{$ENDIF}