zoukankan      html  css  js  c++  java
  • 如何利用预编译指令来判断Delphi 的版本?

    用   {$IFDEF   VER1XX}   来判断  
       
      //   Delphi   4  
      {$IFDEF   VER120}  
          {$DEFINE   VCL4ORABOVE}  
          {$DEFINE   VCL4O}  
          {$DEFINE   DELPHI}  
          {$DEFINE   DELPHI4}  
          {$DEFINE   OVERLOADING}  
          {$DEFINE   OPTIONALPARAMS}  
      {$ENDIF}  
       
      //   C++   Builder   4  
      {$IFDEF   VER125}  
          {$DEFINE   VCL4ORABOVE}  
          {$DEFINE   VCL4O}  
          {$DEFINE   CBUILDER}  
          {$DEFINE   CBUILDER4}  
          {$DEFINE   OVERLOADING}  
          {$DEFINE   OPTIONALPARAMS}  
      {$ENDIF}  
       
      //   Delphi   5   &   CBuilder   5  
      {$IFDEF   VER130}  
          {$DEFINE   VCL4ORABOVE}  
          {$DEFINE   VCL5ORABOVE}  
          {$DEFINE   VCL5O}  
          {$IFDEF   BCB}  
              {$DEFINE   CBUILDER}  
              {$DEFINE   CBUILDER5}  
          {$ELSE}  
              {$DEFINE   DELPHI}  
              {$DEFINE   DELPHI5}  
          {$ENDIF}  
          {$DEFINE   OVERLOADING}  
          {$DEFINE   OPTIONALPARAMS}  
          {$DEFINE   SAMETEXT}  
      {$ENDIF}  
       
      //Delphi   6  
      {$IFDEF   VER140}  
          {$DEFINE   VCL4ORABOVE}  
          {$DEFINE   VCL5ORABOVE}  
          {$IFDEF   BCB}  
              {$DEFINE   CBUILDER}  
              {$DEFINE   CBUILDER6}  
          {$ELSE}  
              {$DEFINE   DELPHI}  
              {$DEFINE   DELPHI6}  
          {$ENDIF}  
          {$DEFINE   OVERLOADING}  
          {$DEFINE   OPTIONALPARAMS}  
          {$DEFINE   SAMETEXT}  
          {$DEFINE   VCL6ORABOVE}  
          {$DEFINE   VCL6O}  
      {$ENDIF}  
       
      //Delphi   7  
      {$IFDEF   VER150}  
          {$DEFINE   VCL4ORABOVE}  
          {$DEFINE   VCL5ORABOVE}  
          {$IFDEF   BCB}  
              {$DEFINE   CBUILDER}  
              {$DEFINE   CBUILDER7}  
          {$ELSE}  
              {$DEFINE   DELPHI}  
              {$DEFINE   DELPHI7}  
          {$ENDIF}  
          {$DEFINE   OVERLOADING}  
          {$DEFINE   OPTIONALPARAMS}  
          {$DEFINE   SAMETEXT}  
          {$DEFINE   VCL6ORABOVE}  
          {$DEFINE   VCL7ORABOVE}  
          {$DEFINE   VCL6O}  
          {$DEFINE   VCL70}  
      {$ENDIF}  
       
      //Delphi   8  
      {$IFDEF   VER160}  
          {$DEFINE   VCL4ORABOVE}  
          {$DEFINE   VCL5ORABOVE}  
          {$IFDEF   BCB}  
              {$DEFINE   CBUILDER}  
              {$DEFINE   CBUILDER8}  
          {$ELSE}  
              {$DEFINE   DELPHI}  
              {$DEFINE   DELPHI8}  
          {$ENDIF}  
          {$DEFINE   OVERLOADING}  
          {$DEFINE   OPTIONALPARAMS}  
          {$DEFINE   SAMETEXT}  
          {$DEFINE   VCL6ORABOVE}  
          {$DEFINE   VCL7ORABOVE}  
          {$DEFINE   VCL80RABOVE}  
          {$DEFINE   VCL6O}  
          {$DEFINE   VCL70}  
          {$DEFINE   VCL80}  
      {$ENDIF}  
       
      //Delphi   9  
      {$IFDEF   VER170}  
          {$DEFINE   VCL4ORABOVE}  
          {$DEFINE   VCL5ORABOVE}  
          {$IFDEF   BCB}  
              {$DEFINE   CBUILDER}  
              {$DEFINE   CBUILDER9}  
          {$ELSE}  
              {$DEFINE   DELPHI}  
              {$DEFINE   DELPHI9}  
          {$ENDIF}  
          {$DEFINE   OVERLOADING}  
          {$DEFINE   OPTIONALPARAMS}  
          {$DEFINE   SAMETEXT}  
          {$DEFINE   VCL6ORABOVE}  
          {$DEFINE   VCL7ORABOVE}  
          {$DEFINE   VCL80RABOVE}  
          {$DEFINE   VCL9ORABOVE}  
          {$DEFINE   VCL6O}  
          {$DEFINE   VCL70}  
          {$DEFINE   VCL80}  
          {$DEFINE   VCL90}  
      {$ENDIF}  
       
      //Delphi   10  
      {$IFDEF   VER180}  
          {$DEFINE   VCL4ORABOVE}  
          {$DEFINE   VCL5ORABOVE}  
          {$IFDEF   BCB}  
              {$DEFINE   CBUILDER}  
              {$DEFINE   CBUILDER10}  
          {$ELSE}  
              {$DEFINE   DELPHI}  
              {$DEFINE   DELPHI10}  
          {$ENDIF}  
          {$DEFINE   OVERLOADING}  
          {$DEFINE   OPTIONALPARAMS}  
          {$DEFINE   SAMETEXT}  
          {$DEFINE   VCL6ORABOVE}  
          {$DEFINE   VCL7ORABOVE}  
          {$DEFINE   VCL80RABOVE}  
          {$DEFINE   VCL9ORABOVE}  
          {$DEFINE   VCL1O0RABOVE}  
          {$DEFINE   VCL6O}  
          {$DEFINE   VCL70}  
          {$DEFINE   VCL80}  
          {$DEFINE   VCL90}  
          {$DEFINE   VCL100}  
      {$ENDIF}  
       
      {$IFDEF   LINUX}  
          {$DEFINE   VCL4ORABOVE}  
          {$DEFINE   VCL5ORABOVE}  
          {$DEFINE   OVERLOADING}  
          {$DEFINE   OPTIONALPARAMS}  
          {$DEFINE   SAMETEXT}  
          {$DEFINE   VCL6ORABOVE}  
          {$DEFINE   VCL6O}  
          {$UNDEF   DELPHI6}  
          {$DEFINE   KYLIX}  
          {$IFDEF   CONDITIONALEXPRESSIONS}  
              {$IF   RTLVersion   =   14.0}  
              {$DEFINE   KYLIX2}  
              {$IFEND}  
              {$IF   RTLVersion   =   14.50}  
              {$DEFINE   KYLIX3}  
              {$IFDEF   BCB}  
                  {$DEFINE   BCBKYLIX3}  
              {$ENDIF}  
              {$IFEND}  
              {$IF   RTLVersion   =   15.0}  
              {$DEFINE   KYLIX4}  
              {$IFEND}  
          {$ENDIF}  
      {$ENDIF}

  • 相关阅读:
    gulp入门指南
    SASS用法指南
    JavaScript中本地对象、内置对象和宿主对象
    Javascript模块化编程(三):require.js的用法
    用户从手机的浏览器访问www.baidu.com,看到的可能跟桌面PC电脑,是不太一样的网页效果,会更适合移动设备使用。请简要分析一下,实现这种网页区分显示的原因及技术原理。
    你知道的,javascript语言的执行环境是"单线程模式",这种模式的好处是实现起来比较简单,执行环境相对单纯;坏处是只要有一个任务耗时很长,后面的任务都必须排队等着,会拖延整个程序的执行,因此很多时候需要进行“异步模式”,请列举js异步编程的方法。
    编写一个参数JavaScript函数parseQueryString,它的用途是把url参数解析为一个对象
    给Array本地对象增加一个原型方法,它用于删除数组条目中重复的条目(可能有多个),返回值是一个包含被删除的重复条目的新数组
    改变checkbox的背景颜色
    使用SSH密钥连接Github
  • 原文地址:https://www.cnblogs.com/MaxWoods/p/1833291.html
Copyright © 2011-2022 走看看