⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 ez_flag.pas

📁 很管用的GIS控件
💻 PAS
字号:
{.$DEFINE TESTING} { Comment for the finished program }
{$DEFINE USE_GRAPHICEX} { uncomment if you want to use GraphicEx support }
{$DEFINE USE_RICHEDIT}  { uncomment if you need RichEdit text }
{$DEFINE ER_MAPPER}   { uncomment for activating ERMAPPER www.ermapper.com }
{$DEFINE TRIAL_VERSION} { trial version switch }

{$DEFINE GIS_CONTROLS}          { this switch prevents compiling only for EzGIS product }
{$DEFINE CAD_CONTROLS}          { this switch prevents compiling only for EzCAD product }

{ language used - only in some forms is used this. See also EzConsts.Pas }
{$DEFINE LANG_ENG}   // { English }
{.$DEFINE LANG_SPA}    // { Spanish }


{ MAIN database library - used in GIS layers with an attached database file
  This referes to property TEzBaseLayer.DBTable

  IMPORTANT !: Only ONE of the following consecutive options must be active
}
{$DEFINE NATIVEDB}          // uncomment for using native DBF tables
{.$DEFINE DATASET_PROVIDER} // uncomment for using component TEzDatasetProvider
{.$DEFINE HALCYONDB}        // uncomment for using Halcyon DBFs
{.$DEFINE BORLAND_BDE}      // uncomment for using BDE DBF TABLES
{.$DEFINE DBISAMDB}         // uncomment for using DBISAM



{$IFDEF NATIVEDB}
{$DEFINE NATIVEDLL}   // uncomment if you want to use our DLL for reading DBF files
                      // otherwise, you will use dbf.pas freeware utility
{$ENDIF}


{$DEFINE GIF_SUPPORT} { uncomment if you want to use .GIF files by Anders Melander }
//{$DEFINE JPEG_SUPPORT}           { uncomment if you want to use .JPG files - not needed is GRAPHICEX is ON}

{ ==== Do not change from here ==== }
{.$DEFINE SWAPPED_FORMAT}
{$IFDEF SWAPPED_FORMAT}
  {$UNDEF LANG_ENG}
  {$DEFINE LANG_SPA}
  {$UNDEF TRIAL_VERSION}
  {$UNDEF USE_GRAPHICEX}
  {$UNDEF USE_RICHEDIT}
  {$UNDEF ER_MAPPER}
{$ENDIF}


{$IFDEF USE_GRAPHICEX}
{$UNDEF JPEG_SUPPORT}
{$ENDIF}

{ ==== This is only for creating the OCX. Don't move ==== }
{.DEFINE IS_OCX}

{ ==== Determination of compiler and others (do NOT change) ==== }
{$IFDEF VER100}   // Delphi 3
{$DEFINE LEVEL3}
{$DEFINE DELPHI3}
{$DEFINE DELPHI}
{$ENDIF}

{$IFDEF VER110} // C++ Builder 3
{$DEFINE LEVEL3}
{$DEFINE BCB3}
{$DEFINE BCB}
{$ENDIF}

{$IFDEF VER120} // Delphi 4
{$DEFINE LEVEL4}
{$DEFINE DELPHI4}
{$DEFINE DELPHI}
{$ENDIF}

{$IFDEF VER125} // C++ Builder 4
{$DEFINE LEVEL4}
{$DEFINE BCB4}
{$DEFINE BCB}
{$ENDIF}

{$IFDEF VER130} // Delphi 5
{$DEFINE LEVEL4}
{$DEFINE LEVEL5}
{$DEFINE DELPHI5}
{$DEFINE DELPHI}
{$ENDIF}

{$IFDEF VER135} // C++ Builder 5
{$DEFINE LEVEL4}
{$DEFINE LEVEL5}
{$DEFINE BCB5}
{$DEFINE BCB}
{$ENDIF}

{$IFDEF VER140} // Delphi 6
{$DEFINE LEVEL4}
{$DEFINE LEVEL5}
{$DEFINE LEVEL6}
{$DEFINE DELPHI6}
{$DEFINE DELPHI}
{$ENDIF}

{$IFDEF VER145} // C++ Builder 6
{$DEFINE LEVEL4}
{$DEFINE LEVEL5}
{$DEFINE LEVEL6}
{$DEFINE BCB6}
{$DEFINE BCB}
{$ENDIF}

{$IFDEF VER150} // Delphi 7
{$DEFINE LEVEL4}
{$DEFINE LEVEL5}
{$DEFINE LEVEL6}
{$DEFINE LEVEL7}
{$DEFINE DELPHI7}
{$DEFINE DELPHI}
{$WARN UNSAFE_CODE OFF}
{$ENDIF}


//***********************************************************************

{$IFDEF BCB}
{$OBJEXPORTALL On}
{$ENDIF}

{$G+}

{$A-}

{$BOOLEVAL OFF} // no complete boolean eval
{$IFDEF TESTING}
{$ASSERTIONS ON}
{$D+} {Enables and disables the generation of debug information}
{$L+} {Enables or disables the generation of local symbol information}
{$ELSE}
{$ASSERTIONS OFF}
{$D-} {Enables and disables the generation of debug information}
{$L-} {Enables or disables the generation of local symbol information}
{$ENDIF}

{==== Global fixed compiler options (do NOT change) ====}
{---Delphi ---}
{$IFDEF DELPHI}
{$B- Incomplete boolean evaluation}
{$H+ Long string support}
{$J+ Writeable typed constants}
{$P- No open string parameters}
{$Q- No arithmetic overflow checking}
{$R- No range checking}
{$T- No type-checked pointers}
{$V- No var string checking}
{$X+ Extended syntax}
{$MINENUMSIZE 1}
{$ENDIF}

{$IFDEF DELPHI7}
{$WARN UNSAFE_CODE OFF}
{$ENDIF}

{---C++Builder ---}
{$IFDEF BCB}
{$B- Incomplete boolean evaluation}
{$H+ Long string support}
{$J+ Writeable typed constants}
{$P- No open string parameters}
{$Q- No arithmetic overflow checking}
{$R- No range checking}
{$T- No type-checked pointers}
{$V- No var string checking}
{$X+ Extended syntax}
{$MINENUMSIZE 1}
{$ENDIF}

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -