Module Dfpanel.pkg
*************************************************************************
*
* Copyright (c) 1997-2001 Data Access Corporation, Miami Florida,
* All rights reserved.
* DataFlex is a registered trademark of Data Access Corporation.
*
************************************************************************/
Dfpanel.Pkg
09-01-1994 : Created
Author: John J. Tuohy
11/12/94 Added Save_Environment
01/23/95 Added windows help support
02/14/95 JJT - Added DFGSINI for 3.01/3.05 dual support of .ini name.
and section name
02/21/95 JJT - Added Make_dialog_proportional message so compiler is
happy
************************************************************************
3.1 Changes - Added Make_panel_normal
************************************************************************
07/23/96 JJT - New Class names
08/10/96 SWB - Changed class colors
10/04/96 SWB - Added support for Restored-window position & size
10/14/97 JJT - Changed add_components to send message to client. Otherwise when
starting maximized w/ no tool or status bar, the client was 0,0 size
10/14/97 JJT - added support for saving toolbar and status bar visible status to regsitry
(now saved as part of normal shutdown)
************************************************************************
VDF8 changes
10/23/2001 JJT/SWB - Added Application object support, removed workspace and KEY support.
Removed internal messages Get Restoredxx (X,Y,CX,CY), Parse_complex, Complex_to_String
Removed ghoWorkspace support
Dfpanel.pkg (view source)- import declarations
- AppPanel : BasicPanel
Construct_Object()
Panel defaults. Use windows MDI color
Set(Integer bState)
- Integer
hoClient
- Integer
Auto_Arrange_Icons_State()
- Integer
hoClient - Integer
bState
Toggle_Auto_Arrange_Icons()
Set(Integer bState)
- Integer
hoClient
- Integer
Client_Scrollbar_State()
- Integer
hoClient - Integer
bState
Toggle_Client_Scrollbar_State()
- Integer
ToolBar_State()
Set(Integer bState)
- Integer
hoToolBar - Integer
hoCommandBars
Toggle_Toolbar()
- Integer
StatusBar_State()
- Integer
hoCommandBars - Integer
hoStatusBar - Boolean
bState
Set(Integer bState)
- Integer
hoStatusBar - Integer
hoCommandBars
Toggle_Statusbar()
AutoSizeLocate()
Size_Components()
- Integer
iToolBar - Integer
iStatBar - Integer
iSizeToolBar - Integer
hoCommandbars
Activate_Component(Integer Obj Integer st integer focusmode)
- Integer
act
Add_Components()
- Integer
hClient - Integer
hoCommandbars
- Integer
Activate()
- Integer
bFail
Client_Message(Integer Msg_Id)
- Integer
hoClient
Arrange_Icons()
Cascade_Windows()
Tile_Windows_Horizontal()
Tile_Windows_Vertical()
Set(Integer sizy Integer sizx)
- Integer
Is_Function(Integer MsgId Integer ObjId Integer DelegateFg)
Returns false to indicate that this is not a DEO. This is used by
delegation to figure out if you are within a DEO and should therefore
send a DEO message. DEO view clients set this true
- Integer
DelMode - Integer
rVal - Integer
Id
- String
Help_Context(Integer Context_Type)
In this class this should return an id or nothing (no delegation).
Note, if no context exists return a 0 or ''.
- Integer
ID - String
rVal
- Integer
HtmlHelpContext(Integer eContext String BYREF sContext)
Get context based on eContext. If no content found, Don't delegate with panels --- end the search (added to 11.1. See help_mx.pkg)
- Integer
eContextFound
- Integer
Verify_Exit_Application()
When verify_exit_appliction is received by default just
send this message to the Mdi-client Id.
- Integer
Id - Integer
rVal
Notify_Exit_Application()
When exit notifiction is received by default just
send this message to the Mdi-client Id.
Minimize_all_Windows()
Restore_all_Windows()
End_Construct_Object()
augmented to activate if required
- Integer
Add_Focus(Handle hoParent)
- Integer
iError - Integer
i - Integer
iViews - Integer[]
hoAutoActivateViews
AddAutoActivateView(Handle hoView)
adds a view to the array of views to be autoactivated
- Integer[]
hoAutoActivateViews
- Panel : AppPanel
Main DEO High level main Panel Class
Construct_Object()
- String
St - Integer
iVal - Integer
dwState
Notify_All_Views(integer Msg integer obj integer Bcast_Focus)
This sends the message register_active_view to all child objects.
It passes the object ID of the object that is requesting this
information. The flag BCast_Focus determines if this should
broadcast or broadcast_focus
- Integer
clobj
Save_Environment()
Save any information you wish about this panel.
Rules for saving:
1. only save if SaveEnvironment=TRUE, ON or YES
2. Save current size and location to ApplicationSize, ApplicationLocation
Notify_Exit_Application()
For high level panel support save of environment
End_Construct_Object()
augmented to remove hourglass
Page(Integer iState)
- ClientArea : AppClientArea
Main DEO High level main MDI Client Class
Currently there is nothing special about this class but it was
created because it is logically correct. Extensions may go here in
the futire
References (4):
Field References (0):
Module | Containing Symbol | Line |
---|