Module Dfclient.pkg

************************************************************************ Copyright (c) 1997-2001 Data Access Corporation, Miami Florida, All rights reserved. DataFlex is a registered trademark of Data Access Corporation. 08/19/94 JJT - Blended Classes from CB and DAF 11/12/94 Added Save_Environment / Load_Environment support in views 11/16/94 JJT - Add define_sysmenu to end_construct_object 02/14/95 JJT - Added DFGSINI for 3.01/3.05 dual support of .ini name and section name. ************************************************************************ 3.1 Changes 03/28/95 JJT - Removed 0 classes. Retained layer for nav & hlp mixin Added DF navigate and Help DEO support. Changed name to dfclient.pkg ************************************************************************ 07/23/96 JJT - New Class names 11/26/97 JJT - View_Changed now checks to see if any sub-views (tab view) are changed ************************************************************************ VDF8 changes 10/23/2001 JJT/SWB - Added Application object support, removed workspace and KEY support. Removed internal messages Parse_complex, Complex_to_String Removed ghoWorkspace support User Classes: dbGroup dbContainer3d dbContainer dbView dbViewToolPanel (use for EntryModalPanel) dbViewPanel (not fully supported)

Dfclient.pkg (view source)
• import declarations
  • Windows.pkg (view source)
  • Dfpanel.pkg (view source)
  • Enclient.pkg (view source)
  • Dfnav_mx.pkg (view source)
    Navigation changes for DF DEOs
  • Dfconfrm.pkg (view source)
  • Dfdbmdpn.pkg (view source)
    adds obsolete pointerButton for dbModalPanel
• dbContainer3d_ : Container3d
  Grouping classes: Used within views to group objects dbContainer3d_ dbContainer3d
  • Activating()
    Inherited from Entry_Client_mixin
    Defeat the activating augmentation for auto-locate as of 15.1 we changed all deactivating/activating signatures to not return values (see windows.pkg / ComboForm / Activating for more) Returns Integer
    • IntegerRVal
• dbContainer3d : dbContainer3d_
  • Construct_Object()
    Inherited from Entry_Client_mixin
• dbGroup_ : Group
  Group Based containers dbGroup_ dbGroup
  • Activating()
    Inherited from Entry_Client_mixin
    Defeat the activating augmentation for auto-locate as of 15.1 we changed all deactivating/activating signatures to not return values (see windows.pkg / ComboForm / Activating for more) Returns Integer
    • IntegerRVal
• dbGroup : dbGroup_
  • Construct_Object()
    Inherited from Entry_Client_mixin
• dbContainer : dbContainer3d
  Invisible Grouping object dbContainer - invisible container
• dbAppClient_ : View
  View Support (views are mdi dialogs) dbAppClient_ dbAppView_ dbView
  • Activating()
    Inherited from Entry_Client_mixin
    Defeat the activating augmentation for auto-locate as of 15.1 we changed all deactivating/activating signatures to not return values (see windows.pkg / ComboForm / Activating for more) Returns Integer
    • IntegerRVal
• dbAppView_ : dbAppClient_
• dbView : dbAppView_
  • Construct_Object()
    Inherited from Entry_View_Client_mixin
  • integerDEO_Object()
    Returns TRUE to indicate that this is a DEO. This is used by delegation to figure out if you are within a DEO and should therefore send a DEO message. DEO clients set this true
  • Activate_current_scope()
    Activate message for views that: 1. restores the view if it is minimized 2. Maintains the current scope's focus.
  • stringLocal_Object_name(string nm)
    ------------deprecated....Use Object_label. Pass full object name - return the relative name e.g., Main.View.Obj1 --> Obj1
    • Integerps
  • IntegerView_Changed()
    Inherited from AppDialog
    • IntegerChanged
  • Close_Client()
    as of 15.0, these were moved to AppDialog super class // // Save View information to dfwin.ini file. Save as: // View_ObjectName=LOC:Row,Col e.g., Cust_Ent=LOC:10,20 // Leaving room for growth here. // { Visibility=Private } Procedure Save_Environment String sWindowPlacement Address aWindowPlacement Boolean bSuccess Integer eShowCmd // save environment to the object, in case it is reactivated during the same run. ZeroType tWindowPlacement To sWindowPlacement Put tWindowPlacement_size To sWindowPlacement at tWindowPlacement.length Move (AddressOf(sWindowPlacement)) To aWindowPlacement Move (GetWindowPlacement(Window_Handle(self), aWindowPlacement)) To bSuccess If bSuccess Begin // if minimized, assume restored, as we don't want to restart minimized! GetBuff from sWindowPlacement at tWindowPlacement.showCmd To eShowCmd If (eShowCmd = SW_SHOWMINIMIZED) Begin Put SW_SHOWNORMAL To sWindowPlacement at tWindowPlacement.showCmd End Set psWindowPlacement to sWindowPlacement End // also save environment to the application object, so it can be used when reloaded If ghoApplication Send DoSaveEnvironment of ghoApplication self False End_Procedure // Augment to check for view string in .INI. Currently, if found // set the location // { Visibility=Private } Procedure Load_Environment String sWindowPlacement boolean bSuccess // if view has alrady been activated and deactivated use the setting from windowplacement saved in the object get psWindowPlacement to sWindowPlacement // Make sure we GET here and not Move. This thing can contain zeros which will get lost in expr. If (length(sWindowPlacement)) begin // if length is zer0, assume it has never been deactivated. Move (SetWindowPlacement(Window_Handle(self), addressof(sWindowPlacement))) To bSuccess End else Begin If ghoApplication Send DoLoadEnvironment of ghoApplication self False end End_Procedure { MethodType=Event NoDoc=True } Procedure Notify_Exit_Application Send Save_Environment End_procedure { NoDoc=True } Procedure Add_Focus Integer hoBase Returns Integer Integer iretVal bState get Visible_state to bState Set Visible_state to False Forward Get Msg_Add_Focus hoBase To iretVal If (iRetVal=0) Send Load_Environment Set Visible_state to bState Procedure_Return iRetVal End_Procedure
• dbFloatingPanel_ : FloatingPanel
  ToolPanel Based Classes dbFloatingPanel_ dbFloatingPanel dbViewFloatingPanel dbViewToolPanel dbModalPanel <---this will get used
  • Activating()
    Inherited from Entry_Client_mixin
    Defeat the activating augmentation for auto-locate as of 15.1 we changed all deactivating/activating signatures to not return values (see windows.pkg / ComboForm / Activating for more) Returns Integer
    • IntegerRVal
• dbFloatingPanel : dbFloatingPanel_
  • Construct_Object()
    Inherited from Entry_Client_mixin
  • integerDEO_Object()
    Returns TRUE to indicate that this is a DEO. This is used by delegation to figure out if you are within a DEO and should therefore send a DEO message. DEO clients set this true
  • integerVerify_Exit_msg()
    Inherited from navigate_mixin
    we Modify this not delegate and look for a parent verify exit msg if this msg is 0. We assume that toolpanels and dbModalPanels are self contained in terms of opening and closing and therefore should only use themselves to figure out if there is a verify exit msg. This is needed in case a db modal panel physically placed inside of another DEO.
    • Integermsg#
• dbViewFloatingPanel : dbFloatingPanel
• dbViewToolPanel : dbViewFloatingPanel
  • Construct_Object()
    Inherited from Entry_View_Client_mixin
• dbModalPanel : dbViewFloatingPanel
  EntryModalPanel
  • Construct_Object()
    Inherited from Entry_View_Client_mixin
    • IntegerList_Object
    • IntegerButton_Height
    • IntegerButton_Width
    • IntegerMax_Text_Extent
    • Button_Ids : array
  • integerButton_Count()
  • Add_Button(string sLabel integer hMsg integer hoTo)
    • IntegerhoBtn
    • Integertx
  • Size_Buttons()
    • Integerbheight
    • Integerbwidth
    • Integernb
    • Integerobj
    • IntegerBobj
    • Integerbt
    • Integermt
    • Integergsiz
    • Integergwd
  • Position_Child_Objects()
    • Integerlsz
    • Integerpsz
    • Integerwd
    • Integerpwd
    • Integerht
    • Integerllc
    • Integernb
    • Integermt
    • Integerbobj
    • Integerobj
    • Integercht
    • Integercol
    • Integerbt
    • Integerlist_obj
    • Integerrmrgn
    • Integerswd
  • End_Construct_Object()
    Inherited from Entry_View_Client_mixin
  • Search()
    • IntegerObj#
  • HandlePopup_Handle()
    created for advanced CD_popup_object support. Returns the true handle of the popup object whether it is a regular object or a CD popup object.
• dbPanel_ : BasicPanel
  Panel Based Classes dbPanel_ dbPanel dbViewPanel_ dbViewPanel None of these are likely to be used
  • Activating()
    Inherited from Entry_Client_mixin
    Defeat the activating augmentation for auto-locate as of 15.1 we changed all deactivating/activating signatures to not return values (see windows.pkg / ComboForm / Activating for more) Returns Integer
    • IntegerRVal
• dbPanel : dbPanel_
  • Construct_Object()
    Inherited from Entry_Client_mixin
• dbViewPanel_ : dbPanel
• dbViewPanel : dbViewPanel_
  • Construct_Object()
    Inherited from Entry_View_Client_mixin
  • integerDEO_Object()
    Returns TRUE to indicate that this is a DEO. This is used by delegation to figure out if you are within a DEO and should therefore send a DEO message. DEO clients set this true

References (13):

Field References (0):