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/PS_VIEW_EQUATES.txt
+++ b/SYSPROG/STPROCINS/PS_VIEW_EQUATES.txt
@ -0,0 +1,108 @@
+compile insert PS_View_Equates
+/* 
+   ** Copyright (C) 2013-2019 Revelation Software Inc. All Rights Reserved **
+   
+   This insert is proprietary and is not  to be used  by or  disclosed
+   to others, nor is it to be copied without written permission from
+   Revelation Technologies, Inc.
+   
+   Author   : Wile C Coyote (Codius Vulgaris)
+   Date     : June 2013
+   Purpose  : Constants for working with PS VIEW-based object structures
+   
+   
+   Comments
+   ========
+   
+   VIEW is not an actual PS type, rather it is a base class from which others
+   derive like PANEL and WINDOW.  It essential provides paging and panning 
+   functionality ...
+   
+   
+   Amended  Date        Reason
+   =======  ====        ======
+   Mr C     13 Feb 19   Added VIEW Properties structure constants
+                        Added PAGESWAPRENDERMODE equates
+   Mr C     03 Mar 15   Added SCROLLMODE equates
+*/
+///////////////////////////////////////////////////////////////////////////////
+///////////////////////////////////////////////////////////////////////////////
+#ifndef _PS_VIEW_EQUATES_
+#define _PS_VIEW_EQUATES_
+///////////////////////////////////////////////////////////////////////////////
+///////////////////////////////////////////////////////////////////////////////
+
+   $insert ps_Equates
+   
+///////////////////////////////////////////////////////////////////////////////
+///////////////////////////////////////////////////////////////////////////////
+
+   // Properties held in PS Style bits in PSPOS_PSSTYLE$ <0,0,1>
+
+   // PS Style equates
+   equ PSS_VIEW_TABWITHINPAGE$            to 0x00000040
+   
+///////////////////////////////////////////////////////////////////////////////
+///////////////////////////////////////////////////////////////////////////////
+
+   // SYSREPOSWINS/SYSREPOSWINEXES structure overrides.
+   
+   // OIWIN
+   equ POS_VIEW_VIRTUALSIZE$              to POS_SCROLLRANGE$      ; // @svm delimited; <0,0,1> Height; <0,0,2> Width
+   equ POS_VIEW_PROPERTIES$               to POS_VIEWPROPERTIES$   ; // @svm delimited; <0,0,1> PageSwapRenderMode
+   
+   // OIWINEXE
+   equ PSPOS_VIEW_VIRTUALSIZE$            to PSPOS_SCROLLRANGE$    ; // @svm delimited; <0,0,1> Height; <0,0,2> Width
+   equ PSPOS_VIEW_PROPERTIES$             to PSPOS_VIEWPROPERTIES$ ; // @svm delimited; <0,0,1> PageSwapRenderMode
+   
+   // POS_VIEW_PROPERTIES$/PSPOS_VIEW_PROPERTIES$ struture equates
+   equ PS_VIEWPROPS_PAGESWAPRENDERMODE$   to 1
+   
+///////////////////////////////////////////////////////////////////////////////
+///////////////////////////////////////////////////////////////////////////////
+
+   // OIWIN/OIWINEXE Virtual Size equates
+   equ PS_VIEW_VIRTUALSIZE_HEIGHT$        to 1
+   equ PS_VIEW_VIRTUALSIZE_WIDTH$         to 2
+   
+///////////////////////////////////////////////////////////////////////////////
+///////////////////////////////////////////////////////////////////////////////
+
+   // Properties held in extended PS style bits in PSPOS_PSSTYLE$ <0,0,2>
+
+   // PS Extended Style equates
+   equ PSSX_VIEW_SCROLLMODEPAGING$        to 0x00010000 ; * // SCROLLMODE property
+   equ PSSX_VIEW_SCROLLMODEPANNING$       to 0x00020000 ; * // SCROLLMODE property
+   
+   equ PSSX_VIEW_SCROLLMODE_MASK$         to bitOr( PSSX_VIEW_SCROLLMODEPAGING$, PSSX_VIEW_SCROLLMODEPANNING$ )
+   
+///////////////////////////////////////////////////////////////////////////////
+///////////////////////////////////////////////////////////////////////////////
+
+   // SCROLLMODE property
+   equ PSSM_NONE$                         to 0 ; * // No scrolling
+   equ PSSM_PAGING$                       to 1 ; * // Paging - show vScrollBar
+   equ PSSM_PANNING$                      to 2 ; * // Panning - show both scroll
+                                               ; * // bars when needed.
+                                               
+///////////////////////////////////////////////////////////////////////////////
+///////////////////////////////////////////////////////////////////////////////	
+
+   // VIRTUALSIZE property values
+   equ PS_VVS_DEVALUE$                   to 0
+   equ PS_VVS_MINVALUE$                  to 0
+   equ PS_VVS_MAXVALUE$                  to 32767   
+   
+///////////////////////////////////////////////////////////////////////////////
+///////////////////////////////////////////////////////////////////////////////
+
+   // PAGESWAPRENDERMODE property
+   equ PS_PSRM_DEFAULT$                  to 0
+   equ PS_PSRM_BKGD_FIRST$               to 1
+   
+///////////////////////////////////////////////////////////////////////////////
+///////////////////////////////////////////////////////////////////////////////
+#endif
+///////////////////////////////////////////////////////////////////////////////
+///////////////////////////////////////////////////////////////////////////////
+