//AB/ Project Windows API controls
//AB/ Object oIDE_Project is a MdiFrame_Project
    //AB/ Set ProjectName to "Windows API controls"
    //AB/ Set ProjectFileName to "WindowsControls.src"
    //AB/ Set GenerateFileName to "NONAME1"
    //AB/ Set Size to 137 154

//AB-IgnoreStart
Use DfAllEnt.pkg
#REPLACE CURRENT$WORKSPACE   "Windows.Controls"

// Project Object Structure
//   Main is a Panel
//     Client_Area is a AppClientArea

// Register all objects
Register_Object Client_Area
Register_Object Main
//AB-IgnoreEnd


//AB-StoreTopStart
Use cApplication.pkg

//  Set date attributes as needed
Set_Date_Attribute SysDate4_State To True
Set_Date_Attribute Date4_State    To True
Set_Date_Attribute Epoch_Value    To 30

Object oApplication Is A cApplication
    Set psCompany To "Sergey V. Natarov"
    Set psProduct To "Windows API Gadgets"
    Set psVersion To "1.0"
    Set psProgram To "Windows Controls"
    //Set psHelpFile To ""

    Procedure OnCreate
        Send DoOpenWorkspace CURRENT$WORKSPACE
    End_Procedure

End_Object  // oApplication

Use Help_Ids.inc // Developer should provide this file of help context links.
Use Std_Help.pkg

// Including base packages...
Use cWindowsEx.h
Use About.dg

Procedure Activate_About
    Send Popup_Modal Of oAbout
End_Procedure
//AB-StoreTopEnd

//AB-IgnoreStart
Use dfPanel.pkg
Use DfAClnt.pkg
//AB-IgnoreEnd

Object Main is a Panel
    Set Label to "Windows API Controls"
    Set Size to 90 138
    //AB-MenuPackage
    Use cWindowsEx.mn  //  Menu package.
    //AB-End
    //AB-ToolbarPackage
    Use DefaultToolbar.pkg  //  Tool-Bar object.
    //AB-End
    
    Object Client_Area is a AppClientArea
        //AB-ViewStart
        Use cWinButton.VW
        Use cMonthCal.VW
        Use cFolderTabs.VW
        Use SelectDoc.VW
        Use CTab.VW
        Use dbToolTip.VW
        Use cWinToolTipSubClasses.vw
        //AB-ViewEnd
    End_Object    // Client_Area

    //AB-StatusBarPackage
    Use DefaultStatusbar.pkg  //  Status-Bar object.
    //AB-End
    

    //AB-StoreStart
    Set View_Mode To ViewMode_Zoom
    
    
    //AB-StoreEnd

End_Object    // Main


//AB-StoreStart
Start_UI
//AB-StoreEnd

//AB/ End_Object    // oIDE_Project
