cpw3.pas

生物信息学中的遗传数据分析的delphi源码。

{*******************************************************************
*                                                                  *
*  COMPONENT for MS DOS and Windows source code.                   *
*                                                                  *
*  (c) 1993, Roderic D. M. Page                                    *
*                                                                  *
*  Language: Turbo Pascal (Pascal with object-oriented extensions) *
*  Compiler: Turbo Pascal 6.0 (MS DOS)                             *
*            Turbo Pascal for Windows 1.0 (WINDOWS)                *
*                                                                  *
*  Notes:    Program interface is currently Windows specific.      *
*                                                                  *
*******************************************************************}

{ TO DO

  1. Improve loading of help filename (construct from exe file
     name (see helpex.pas in \tpw\docdemos\helpex)

[  2. Overhaul interface]

  3. improve loading of DLL's.

[  4. Now that revised cpwprintis used, what happens if
     user selects new printer using control panel?]

  5. The problem of sometimes getting large chunks of blank
     screen is presumably due to calling StatusBarUpDate
     after creating a child window. this resets the
     invalid rectangle to be the status bar, so that
     the program "forgets" any area hidden by a dialog box.

  6. Resolve just which window (CPW or CPTSHOW) should change
     menu items.


  9 Sep 1991

  Major clean up, Tree| commands shifted to CPTSHOW.PAS
  MDI interface cleaned up, Profile| menu added.


     Jun 1992 Substantial rewrite to make use of
              new data structures, uses external editor,
              etc.
   6 Oct 1992 Improved status bar, new look Tree window ribbons.
  16 Nov 1992 Revised menu structure to make more consistent with
                                  standard windows apps. Profile menu discarded.        
   2 Dec 1992 Bug in File Open command fixed. If file didn't exist then
              program would crash with UAE if user selected to view
              the trees (which would be nonexistent).
  21 Dec 1992 Resources now bound using Resource Workshop as I kept
              getting spurious Error 164: Duplicate resource identifier
              messages.
  27 Jan 1993 Support for "quick opening" of input stream to read trees.

	29 Apr 93	Fixes for Dave Maddison's bugs began.

	14 Jun 93	File Import command added.

}


{$I cpdir.inc}

{$D COMPONENT 2.0