mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-08-09 13:22:24 +03:00
Integration of OCCT 6.5.0 from SVN
This commit is contained in:
16
src/AppStd/AppStd.cdl
Executable file
16
src/AppStd/AppStd.cdl
Executable file
@@ -0,0 +1,16 @@
|
||||
-- File: AppStd.cdl
|
||||
-- Created: Sep 7 14:50:00 2000
|
||||
-- Author: TURIN Anatoliy <ati@nnov.matra-dtv.fr>
|
||||
-- Copyright: Matra Datavision 2000
|
||||
|
||||
package AppStd
|
||||
|
||||
uses
|
||||
|
||||
Standard, TCollection, TColStd, Resource, CDM, TDocStd
|
||||
is
|
||||
class Application;
|
||||
|
||||
end AppStd;
|
||||
|
||||
|
33
src/AppStd/AppStd_Application.cdl
Executable file
33
src/AppStd/AppStd_Application.cdl
Executable file
@@ -0,0 +1,33 @@
|
||||
-- File: AppStd_Application.cdl
|
||||
-- Created: Sep 7 14:59:06 2000
|
||||
-- Author: TURIN Anatoliy <ati@nnov.matra-dtv.fr>
|
||||
-- Copyright: Matra Datavision 2000
|
||||
|
||||
|
||||
class Application from AppStd inherits Application from TDocStd
|
||||
|
||||
uses MessageDriver from CDM,
|
||||
SequenceOfExtendedString from TColStd,
|
||||
ExtendedString from TCollection
|
||||
|
||||
is
|
||||
|
||||
Create returns mutable Application from AppStd;
|
||||
|
||||
MessageDriver(me: mutable)
|
||||
returns MessageDriver from CDM
|
||||
is redefined;
|
||||
|
||||
Formats(me: mutable; theFormats: out SequenceOfExtendedString from TColStd)
|
||||
---Purpose: returns supported format for application documents.
|
||||
is redefined;
|
||||
|
||||
ResourcesName (me: mutable)
|
||||
---Purpose: returns the file name which contains application
|
||||
-- resources
|
||||
returns CString from Standard;
|
||||
|
||||
fields
|
||||
myMessageDriver : MessageDriver from CDM;
|
||||
|
||||
end Application;
|
50
src/AppStd/AppStd_Application.cxx
Executable file
50
src/AppStd/AppStd_Application.cxx
Executable file
@@ -0,0 +1,50 @@
|
||||
// File: AppStd_Application.cxx
|
||||
// Created: Sep 7 15:01:46 2000
|
||||
// Author: TURIN Anatoliy <ati@nnov.matra-dtv.fr>
|
||||
// Copyright: Matra Datavision 2000
|
||||
// History : AGV 15/10/01 : Add XmlOcaf support; add MessageDriver support
|
||||
|
||||
#include <AppStd_Application.ixx>
|
||||
#include <CDM_COutMessageDriver.hxx>
|
||||
|
||||
//=======================================================================
|
||||
//function : AppStd_Application
|
||||
//purpose :
|
||||
//=======================================================================
|
||||
|
||||
AppStd_Application::AppStd_Application()
|
||||
{
|
||||
myMessageDriver = new CDM_COutMessageDriver;
|
||||
}
|
||||
|
||||
//=======================================================================
|
||||
//function : MessageDriver
|
||||
//purpose :
|
||||
//=======================================================================
|
||||
|
||||
Handle(CDM_MessageDriver) AppStd_Application::MessageDriver ()
|
||||
{
|
||||
return myMessageDriver;
|
||||
}
|
||||
|
||||
//=======================================================================
|
||||
//function : Formats
|
||||
//purpose :
|
||||
//=======================================================================
|
||||
void AppStd_Application::Formats(TColStd_SequenceOfExtendedString& theFormats)
|
||||
{
|
||||
theFormats.Append("XmlOcaf");
|
||||
theFormats.Append("BinOcaf");
|
||||
theFormats.Append("MDTV-Standard");
|
||||
}
|
||||
|
||||
//=======================================================================
|
||||
//function : ResourcesName
|
||||
//purpose :
|
||||
//=======================================================================
|
||||
|
||||
Standard_CString AppStd_Application::ResourcesName() {
|
||||
const Standard_CString aRes = "Standard";
|
||||
return aRes;
|
||||
}
|
||||
|
Reference in New Issue
Block a user