added sysprog entities

2024-03-25 15:17:34 -07:00
parent 600a8e1f61
commit 3a6a2b6b5b
1028 changed files with 171660 additions and 0 deletions
--- a/SYSPROG/STPROCINS/APPNOTE_EQUATES.txt
+++ b/SYSPROG/STPROCINS/APPNOTE_EQUATES.txt
@ -0,0 +1,96 @@
+compile insert AppNote_Equates
+/*
+   ** Copyright (C) 1992-2014 Revelation Software Inc. All Rights Reserved **
+   
+   Author   : ????
+   Date     : Between the years when the oceans drank Atlantis, and the rise
+              of the sons of Aryas ...
+   Purpose  : Constants for use with APPNOTE entities
+             
+   
+   Comments
+   ========
+      
+   
+   Amended  Date        Reason
+   =======  ====        ======
+   cp       15 Oct 97   Updated for 3.5; added header
+   mtr      05 Feb 14   Updated for OI10 (HTML format)   
+   Mr C     24 Nov 14   Added header guards, default values
+   Mr C     03 Jan 15   Added "system" fields
+   Mr C     20 Mar 15   Added FrameStyle constants
+   Mr C     20 Jul 16   Changed default Font size to 9pt
+                        Chnaged default size
+*/
+///////////////////////////////////////////////////////////////////////////////
+///////////////////////////////////////////////////////////////////////////////
+#ifndef _APPNOTE_EQUATES_
+#define _APPNOTE_EQUATES_
+///////////////////////////////////////////////////////////////////////////////
+///////////////////////////////////////////////////////////////////////////////
+
+   $insert ps_Window_Equates
+   $insert colors
+   $insert logical
+   
+///////////////////////////////////////////////////////////////////////////////
+///////////////////////////////////////////////////////////////////////////////
+
+   equ ACOL$                 to 1
+   equ AROW$                 to 2
+   equ AWIDTH$               to 3
+   equ AHEIGHT$              to 4
+   equ AREADONLY$            to 5
+   equ AFONT$                to 6
+   equ ABKCOLOR$             to 7
+   equ AFGCOLOR$             to 8
+   equ AJUST$                to 9
+   equ ATITLE$               to 10
+   equ ATEXT$                to 11
+   equ ASCROLL$              to 12
+   equ AHTMLTEXT$            to 13
+   equ ANONMODAL$            to 14
+   equ AFRAMESTYLE$          to 15
+    
+   equ ANUMFIELDS$           to 15
+   
+   equ ATESTRUN$             to 100 ; * // "hidden" system field to denote 
+                                      * // if we're in TESTRUN from the IDE
+   equ ALOCKED$              to 101 ; * // "hidden" system locked field                                    
+
+   equ AMINWIDTH$            To 200
+   equ AMINHEIGHT$           to 160
+
+   equ HELPTOOLNAME$         to "QuickHelp"
+   equ APPNOTETYPE$          to "APPNOTE"
+   equ APPNOTECLASS$         to ""
+   
+   * // Default values
+   equ ADEFCOL$              to -1
+   equ ADEFROW$              to -1
+   equ ADEFWIDTH$            to 750 ; // wide enough for the editor toolbar 
+   equ ADEFHEIGHT$           to 480 
+   equ ADEFREADONLY$         to FALSE$
+   equ ADEFBKCOLOR$          to COLOR_WINDOW$
+   equ ADEFFGCOLOR$          to COLOR_WINDOWTEXT$
+   equ ADEFFRAMESTYLE$       to PS_FRAMESTYLE_SIZEABLE$
+   
+   equ DFLT_FONT_SIZE$       to 9  ; * 9pt
+   
+   * // Property Panel Names
+   equ PPL_ACOL$             to "Left"
+   equ PPL_AROW$             to "Top"
+   equ PPL_AWIDTH$           to "Width"
+   equ PPL_AHEIGHT$          to "Height"
+   equ PPL_AREADONLY$        to "ReadOnly"
+   equ PPL_AFONT$            to "Font"
+   equ PPL_ABKCOLOR$         to "BackColor"
+   equ PPL_AFGCOLOR$         to "ForeColor"
+   equ PPL_AMODAL$           to "Modal"
+   equ PPL_AFRAMESTYLE$      to "FrameStyle"
+   
+///////////////////////////////////////////////////////////////////////////////
+///////////////////////////////////////////////////////////////////////////////
+#endif
+///////////////////////////////////////////////////////////////////////////////
+///////////////////////////////////////////////////////////////////////////////