//TH-Header
//*****************************************************************************************
// Copyright (c)  2020 PP7
// All rights reserved.
//
// $FileName    : csfWebColumnHtml.pkg
// $ProjectName : PP7 SyncFusion
// $Authors     : Wil van Antwerpen
// $Created     : 06.04.2020  13:46
//
// Contents:
// This is a web framework wrapper class for the SyncFusion Grid control.
// Documentation for the API is here:
// https://ej2.syncfusion.com/documentation/api/grid
//
//*****************************************************************************************
//TH-RevisionStart
// ********************
// MODIFICATION SUMMARY
// ********************
// ####### DD/MM/YYYY  WHO COMMENT
//TH-RevisionEnd
Use csfWebColumn.pkg

{ DesignerJSClass=df.WebColumn }
Class csfWebColumnHtml Is a csfWebColumn
    Procedure Construct_Object
        Forward Send Construct_Object
        Property String  psHtmlBefore        ""
        Property String  psHtmlAfter         ""
    End_Procedure
    
    Procedure LoadCustomHtml
        tsfWebColumnCustomDraw CustomDraw
        Move True                 To CustomDraw.bHasHtml
        Get psHtmlBefore          To CustomDraw.sHtmlBefore
        Get psHtmlAfter           To CustomDraw.sHtmlAfter
        Set pCustomDraw to CustomDraw
    End_Procedure
    
    Function LoadWebColumnProperties Returns tsfWebColumn
        tsfWebColumn Column
        Forward Get LoadWebColumnProperties to Column
        Send LoadCustomHtml
        Function_Return Column
    End_Function
    
    Function IsHtmlColumn Returns Boolean
        Function_Return true
    End_Function
End_Class