xpdelphi.inc

来自「非常好的xp界面控件」· INC 代码 · 共 41 行

{ Borland version dependant conditional defines.}

{$IFDEF VER100} { Delphi 3.0 }
{$DEFINE DELPHI3}
{$DEFINE DELPHIVER}
{$ENDIF}

{$IFDEF VER120} { Delphi 4.0 }
{$DEFINE DELPHI4}
{$DEFINE DELPHIVER}
{$ENDIF}

{$IFDEF VER110} { C++ Builder 3.0 }
{$DEFINE BUILDER3}
{$DEFINE BUILDERVER}
{$ENDIF}

{$IFDEF VER125} { C++ Builder 4.0 }
{$DEFINE BUILDER4}
{$DEFINE BUILDERVER}
{$ENDIF}

{$IFDEF VER130} { Delphi 5.0 }
{$DEFINE DELPHI5}
{$DEFINE DELPHIVER}
{$ENDIF}

{$IFDEF VER140} { Delphi 6.0 }
{$DEFINE DELPHI6}
{$DEFINE DELPHI6UP}
{$DEFINE DELPHIVER}
{$ENDIF}

{$IFDEF VER150} { Delphi 7.0 }
{$DEFINE DELPHI7}
{$DEFINE DELPHI6UP}
{$DEFINE DELPHIVER}
{$ENDIF}