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

📄 cpdir.inc

📁 生物信息学中的遗传数据分析的delphi源码。
💻 INC
字号:
{*******************************************************************
*                                                                  *
*  COMPONENT for MS DOS and Windows source code.                   *
*                                                                  *
*  (c) 1992, Roderic D. M. Page                                    *
*                                                                  *
*  Language: Turbo Pascal (Pascal with object-oriented extensions) *
*  Compiler: Turbo Pascal 6.0 (MS DOS)                             *
*            Turbo Pascal for Windows 1.x (WINDOWS)                *
*                                                                  *
*  Notes:    Program interface is currently Windows specific.      *
*                                                                  *
*******************************************************************}

{*

   Compiler directives (5/31/91)

   Mon 19 Aug 1991 Code cleaned up.

*}

{$DEFINE COMPONENT}
{$DEFINE NEWBUFFER}               { Use new tree buffer code 29 Jan 92 }
{$DEFINE DEVICE}                  { Use new display buffer code 5 Feb 92 }
{$IFNDEF COMPONENT}
	{$DEFINE DEBUG }               { Debugging }
{$ENDIF}
{$DEFINE Not8086 }                { Will not run on 8086 machines }
{$DEFINE NotRealMode }            { Will not run in real mode }


{-----------------------------Debugging------------------------------------}

{$IFDEF DEBUG}
{$R+}                             { Range checking on }
{$D+}                             { Debug information off }
{$L+}                             { Local symbol information on}
{$ELSE}
{$R-}                             { Range checking off }
{$D-}                             { Debug information off }
{$L-}                             { Local symbol information off}
{$ENDIF}

{-----------------------------All systems----------------------------------}

{$I+}                             { Input/output checking }
{$V+}                             { Var-string checking on }
{$X-}                             { Extended syntax off}
{$B-}                             { Short-circuit Boolean evaluation on}
{$S+}                             { Stack checking on }

{-----------------------------80x86----------------------------------------}

{$IFDEF CPU86}
{$IFDEF Not8086}
{$G+}                             { Generate 80286 code on }
{$ELSE}
{$G-}                             { Generate 80286 code off }
{$ENDIF}
{$ENDIF}

{-----------------------------80x87----------------------------------------}

{$IFDEF CPU87}
{$N+}                             { use coprocessor }
{$ELSE}
{$N-}                             { use run-time library }
{$ENDIF}

{-----------------------------MS DOS---------------------------------------}

{$IFDEF MSDOS}
{$E-}                             { Emulation off }
{$F+}                             { Force far calls }
{$O+}                             { Overlay code generation }
{$M 65520,0,655360}               { Memory allocation sizes }
{$ENDIF}

{-----------------------------Windows 3.x----------------------------------}

{$IFDEF WINDOWS}
{$IFDEF NotRealMode}
{$W-}                                { No stack frames }
{$ELSE}
{$W+}                                { Windows stack frames for real mode }
{$ENDIF}
{$X+}                                { Extended syntax on }
{$C MOVEABLE DEMANDLOAD DISCARDABLE }{ Code segment attributes }
{$M 26384, 8192}                     { Memory allocation sizes (Stk, Heap)}
{$DEFINE BWCC}                       { Use Borland dialog boxes }
{$DEFINE BINDRESOURCES }             { Bind resources with Resource Workshop }
{$ENDIF}

⌨️ 快捷键说明

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