0022627: Change OCCT memory management defaults
[occt.git] / src / XCAFApp / XCAFApp_Application.cxx
CommitLineData
7fd59977 1// File: XCAFApp_Application.cxx
2// Created: Wed May 24 11:02:31 2000
3// Author: data exchange team
4// <det@strelox.nnov.matra-dtv.fr>
5
6#include <XCAFApp_Application.ixx>
7#include <TPrsStd_DriverTable.hxx>
8#include <XCAFPrs_Driver.hxx>
9#include <XCAFDoc_DocumentTool.hxx>
10#include <TDF_Label.hxx>
11
12//=======================================================================
13//function : GetApplication
14//purpose :
15//=======================================================================
16
17Handle(XCAFApp_Application) XCAFApp_Application::GetApplication()
18{
19 static Handle(XCAFApp_Application) locApp;
20 if ( locApp.IsNull() ) locApp = new XCAFApp_Application;
21 return locApp;
22}
23
24//=======================================================================
25//function : XCAFApp_Application
26//purpose :
27//=======================================================================
28
29XCAFApp_Application::XCAFApp_Application()
30{
31 // register driver for presentation
32 Handle(TPrsStd_DriverTable) table = TPrsStd_DriverTable::Get();
33 table->AddDriver (XCAFPrs_Driver::GetID(), new XCAFPrs_Driver);
34}
35
36//=======================================================================
37//function : Formats
38//purpose :
39//=======================================================================
40
41void XCAFApp_Application::Formats(TColStd_SequenceOfExtendedString& Formats)
42{
43 Formats.Append(TCollection_ExtendedString ("MDTV-XCAF"));
44 Formats.Append(TCollection_ExtendedString ("XmlXCAF"));
45 Formats.Append(TCollection_ExtendedString ("XmlOcaf"));
46 Formats.Append(TCollection_ExtendedString ("MDTV-Standard"));
47}
48
49//=======================================================================
50//function : ResourcesName
51//purpose :
52//=======================================================================
53
54Standard_CString XCAFApp_Application::ResourcesName()
55{
56 return Standard_CString("XCAF");
57// return Standard_CString("Standard");
58}
59
60//=======================================================================
61//function : InitDocument
62//purpose :
63//=======================================================================
64
65void XCAFApp_Application::InitDocument(const Handle(TDocStd_Document)& aDoc) const
66{
67 XCAFDoc_DocumentTool::Set(aDoc->Main());
68}