tedefs.inc

Do your applications look a little boring? Would you like to get spectacular yet easy to use visual

///{$define XP_RENDER}
//{$define Trial}
///
{$ifdef VER100}
  {$define D3} // Delphi 3
{$endif VER100}

{$ifdef VER110}
  {$define C3} // C++ Builder 3
{$endif VER110}

{$ifdef VER120}
  {$define D4} // Delphi 4
{$endif VER120}

{$ifdef VER125}
  {$define C4} // C++ Builder 4
{$endif VER125}

{$ifdef VER130}
  {$ifdef BCB}
    {$define C5} // C++ Builder 5
  {$else}
    {$define D5} // Delphi 5
  {$endif BCB}
{$endif VER130}

{$ifdef VER140}
  {$ifdef BCB}
    {$define C6} // C++ Builder 6
  {$else}
    {$define D6} // Delphi 6
  {$endif BCB}
{$endif VER140}

{$ifdef VER150}
  {$define D7} // Delphi 7
{$endif VER150}

{$IFDEF VER170} { Borland Delphi 9.0 }
  {$define D7} // Delphi 7
  {$define D9} // Delphi 9
{$ENDIF}

{$IFDEF VER180} { Borland Delphi 10 }
  {$DEFINE D7}
  {$DEFINE D8}
  {$DEFINE D9}
  {$DEFINE D10}
{$ENDIF}

{$IFDEF VER190} { Borland Delphi 11 }
  {$DEFINE D7}
  {$DEFINE D8}
  {$DEFINE D9}
  {$DEFINE D10}
  {$DEFINE D11}
{$ENDIF}


{$ifdef D3}
  {$define D3C3} // Delphi 3 or C++ Builder 3
{$endif D3}

{$ifdef C3}
  {$define D3C3} // Delphi 3 or C++ Builder 3
  {$define DP}   // Default params
///  {$ObjExportAll On}
  {$undef C3}
{$endif C4}

{$ifdef D4}
  {$define DP}  // Default params
  {$undef D4}
{$endif D4}

{$ifdef C4}
  {$define DP}  // Default params
///  {$ObjExportAll On}
  {$undef C4}
{$endif C4}

{$ifdef D5}
  {$define D5UP} // Delphi 5 or superior
  {$define DP}   // Default params
  {$undef D5}
{$endif D5}

{$ifdef C5}
  {$define D5UP} // Delphi 5 or superior
  {$define DP}   // Default params
///  {$ObjExportAll On}
  {$undef C5}
{$endif C5}

{$ifdef D6}
  {$define D5UP} // Delphi 5 or superior
  {$define D6UP} // Delphi 6 or superior
  {$define DP}   // Default params
  {$undef D6}
{$endif D6}

{$ifdef C6}
  {$define D5UP} // Delphi 5 or superior
  {$define D6UP} // Delphi 6 or superior
  {$define DP}   // Default params
///  {$ObjExportAll On}
///  {$undef C6}
{$endif C6}
///
{$ifdef D7}
  {$define D5UP} // Delphi 5 or superior
  {$define D6UP} // Delphi 6 or superior
  {$define D7UP} // Delphi 7 or superior
  {$define DP}   // Default params
///  {$Warn UNSAFE_CODE OFF}
///  {$Warn UNSAFE_CAST OFF}
///  {$Warn UNSAFE_TYPE OFF}
  {$undef D7}
{$endif D7}