TView
Source: source/classes/tview.prg
TView is a lightweight view stub that associates a name with a set of work areas. It serves as a simple data container for organizing and referencing related database work areas under a single named view. It can be used as a building block for more complex view-management systems.
Key DATA Members
| DATA | Type | Description |
|---|---|---|
cName | Character | View name identifier |
aWorkAreas | Array | Array of associated work area references |
Methods
| Method | Description |
|---|---|
New( cName ) | Create a named view with an empty work area list |
Example: Create View Object
#include "FiveWin.ch"
function Main()
local oView
oView := TView():New( "CustomerOrders" )
AAdd( oView:aWorkAreas, "CUSTOMER" )
AAdd( oView:aWorkAreas, "ORDERS" )
AAdd( oView:aWorkAreas, "ITEMS" )
MsgInfo( "View: " + oView:cName + " has " + ;
Str( Len( oView:aWorkAreas ) ) + " work areas" )
return nilNotes
- TView is a minimal class with no methods beyond the constructor. It is intended as a data structure for organizing work area references.
- The
aWorkAreasarray is freely extensible; elements can be alias names, area numbers, or any user-defined identifier. - This class does not perform any database operations — it is purely a naming and grouping container.