//****************************************************************************
// $Module type: Class
// $Module name: cWindbForm
// $Author     : Nils G. Svedmyr
// Created     : 2004-05-15 @ 16:02
//
// Description :
//
// $Rev History:
//    2004-05-15  Module header created
//****************************************************************************
Use cWinToolTip.pkg 
Use Dfentry.pkg

#IF (!@ >= 120)
{ OverrideProperty=piToolTipIcon InitialValue=TTI_INFO }
{ OverrideProperty=piToolTipIcon EnumList="TTI_INFO, TTI_NONE, TTI_WARNING, TTI_ERROR" }
{ OverrideProperty=pbToolTipBalloon InitialValue=True }
{ OverrideProperty=pbToolTips InitialValue=True }
{ OverrideProperty=pbAutoLabelAsToolTipTitle InitialValue=True }
{ OverrideProperty=pbAutoStatusHelpAsToolTip InitialValue=True }
#ENDIF
Class cWindbForm Is A dbForm

    Import_Class_Protocol cWinToolTip_mx
    Procedure Construct_Object
        Forward Send Construct_Object
        Send Define_cWinToolTip
        Set pbClassEnabledHandleType    To True  // True=Default
        Set pbClassDisabledHandleType   To True  // True=Default
        Set pbClassEntryStateHandleType To True  // True=Default
    End_Procedure // Construct_Object

End_Class // cWindbForm