001type
002  IContext = interface(IDispatch)
003    ['{79847D79-A3BE-408F-B59F-662B91BC6350}']
004    function Get_ContextObject: IDispatch; safecall;
005    function Get_UserName: WideString; safecall;
006    function Get_NegotiateAuth: WordBool; safecall;
007    function Get_Language: WideString; safecall;
008    procedure Set_Language(Value: WideString); safecall;
009    function Get_TimeBias: Double; safecall;
010    function getName(ID: OleVariant): WideString; safecall;
011    function getDescription(ID: OleVariant): WideString; safecall;
012    function getPropValue(const ClassName: WideString; const PropName: WideString; 
013      ID: OleVariant): OleVariant; safecall;
014    procedure setPropValue(const ClassName: WideString; const PropName: WideString; 
015      ID: OleVariant; Value: OleVariant); safecall;
016    procedure getPropValues(const ClassName: WideString; 
017      const PropName: WideString; IDS: OleVariant; OnValueEvent: OleVariant; 
018      ThreadCount: Integer; ThreadSafe: WordBool); safecall;
019    procedure setPropValues(const ClassName: WideString; 
020      const PropName: WideString; IDS: OleVariant; OnValueNeededEvent: OleVariant; 
021      ThreadCount: Integer; ThreadSafe: WordBool); safecall;
022    function createDataSet(const TargetClassName: WideString): IContextDataSet; safecall;
023    function select(const ClassName: WideString; QueryItems: OleVariant): IDispatch; safecall;
024    function executeMethod(const ClassName: WideString; 
025      const MethodName: WideString; Params: OleVariant): OleVariant; safecall;
026    function getClass(const ClassName: WideString): WideString; safecall;
027    function enumerationItem(ItemIdentifier: OleVariant): WideString; safecall;
028    function getResource(const Name: WideString): WideString; safecall;
029    function bulkInsert(const ClassName: WideString; 
030      const Data: IDispatch): IContextDataSet; safecall;
031    function PreProcessScript(const Script: WideString; Indent: WordBool; 
032      const CommentMark: WideString): WideString; safecall;
033    function executeReport(const ClassName: WideString; 
034      const TemplateName: WideString; Params: OleVariant): IDispatch; safecall;
035    procedure saveReport(const ClassName: WideString; 
036      const TemplateName: WideString; Params: OleVariant; const FileName: WideString); safecall;
037    function Get_Variable(const Name: WideString; Persistent: WordBool): OleVariant; safecall;
038    procedure Set_Variable(const Name: WideString; Persistent: WordBool; 
039      Value: OleVariant); safecall;
040    function DebugString(const Message: WideString): WideString; safecall;
041    procedure raiseManagedException(const ExceptionMessage: WideString); safecall;
042    function createGUID: WideString; safecall;
043    function getTempFileName(const Extension: WideString): WideString; safecall;
044    function HasUI: WordBool; safecall;
045    function Handle: Integer; safecall;
046    procedure processStart(const Description: WideString; ItemCount: Integer; 
047      CanAbort: WordBool); safecall;
048    function processStep: WordBool; safecall;
049    procedure processStop; safecall;
050    procedure Sleep(MSecs: Integer); safecall;
051    function executeConsoleProcess(const CommandLine: WideString; 
052      MaxDuration: Integer; const OutputData: OleVariant): Integer; safecall;
053    function downloadData(const Host: WideString; const Url: WideString; 
054      const UserName: WideString; const Password: WideString; 
055      NegotiateAuth: WordBool; PostData: OleVariant; 
056      const PostContentType: WideString; PostDataIsBinary: WordBool; 
057      CanCache: WordBool; NewSession: WordBool; TimeOut: Integer): OleVariant; safecall;
058    function LineBreak: WideString; safecall;
059    function Transliterate(const Value: WideString): WideString; safecall;
060    procedure CompareLists(var List1: OleVariant; var List2: OleVariant; 
061      const Delimiter: WideString; CaseSensitive: WordBool); safecall;
062    function parseJSON(const JSON: WideString): WideString; safecall;
063    function ConvertExcel(Source: OleVariant; const Format: WideString): IDispatch; safecall;
064    function createBinaryData: IDispatch; safecall;
065    function getCRC(Data: OleVariant): WideString; safecall;
066    function buildNamedFile(const Data: IDispatch; 
067      const StoredFileName: WideString; Propmpt: WordBool; 
068      Compress: WordBool): IDispatch; safecall;
069    procedure parseNamedFile(NamedFile: OleVariant; out FileName: OleVariant; 
070      out Data: OleVariant); safecall;
071    function createRaster: IDispatch; safecall;
072    function BinaryToBitmap(const Data: IDispatch): IDispatch; safecall;
073    function getOleObject(const ClassID: WideString; 
074      const AccessibleFileName: WideString): IDispatch; safecall;
075    function PlaceDataSet(const Range: IDispatch; const DataSet: IContextDataSet; 
076      ShiftRows: WordBool; ShiftColumns: WordBool): Integer; safecall;
077    procedure ExportObject(var Document: OleVariant; const ID: WideString; 
078      const ClassID: WideString); safecall;
079    function createZIPArchive: IDispatch; safecall;
080    function callRoutine(const ClassName: WideString; 
081      const RoutineName: WideString; var RetValue: OleVariant; 
082      const ScriptPart: OleVariant): WordBool; safecall;
083    function selectVaue(const ClassDomain: WideString; 
084      const ExpressionContext: IUnknown; var Value: OleVariant): WordBool; safecall;
085    function editValues(const ValuesList: WideString; const Title: WideString; 
086      UseTabs: WordBool; HideOKButton: WordBool; 
087      const ScriptPart: OleVariant): WordBool; safecall;
088    function MsgBox(const Prompt: WideString; Buttons: LongWord; 
089      const Title: WideString; const HelpFile: WideString; Context: LongWord): Integer; safecall;
090    function ShowMsgBox(const Prompt: WideString; Buttons: LongWord; 
091      const Title: WideString; const HelpFile: WideString; Context: LongWord): Integer; safecall;
092    procedure showView(const ViewName: WideString; Key: OleVariant; 
093      const DetailPropertyName: WideString); safecall;
094    procedure showDataSet(const DataSet: ContextDataSet; const Caption: WideString; 
095      ColumnCaptions: OleVariant; ColumnOnChangeHandlers: OleVariant; 
096      TakeActionsFromView: OleVariant); safecall;
097    procedure SaveExternalDataToFolder(const Resource: WideString; 
098      const Folder: WideString); safecall;
099    function PerformAsyncTask(ID: OleVariant): WordBool; safecall;
100    procedure RebuildTextIndex(ClassID: OleVariant; FieldID: OleVariant; 
101      NoDDL: WordBool; ThreadCount: Integer); safecall;
102    function MainHandle: Integer; safecall;
103    function IsHTMLDocumentSafe(const HTML: WideString): WordBool; safecall;
104    function EnsafeHTMLDocument(const HTML: WideString; RemoveHead: WordBool; 
105      Format: WordBool; PureXML: WordBool): WideString; safecall;
106    procedure ImportObjects(const Document: IDispatch); safecall;
107    property ContextObject: IDispatch read Get_ContextObject;
108    property UserName: WideString read Get_UserName;
109    property NegotiateAuth: WordBool read Get_NegotiateAuth;
110    property Language: WideString read Get_Language write Set_Language;
111    property TimeBias: Double read Get_TimeBias;
112    property Variable[const Name: WideString; Persistent: WordBool]: OleVariant 
113      read Get_Variable write Set_Variable;
114  end;