src/AppStdL/AppStdL_Application.cdl

   1 -- Created on: 2004-06-29
   2 -- Created by: Eugeny NAPALKOV
   3 -- Copyright (c) 2004-2014 OPEN CASCADE SAS
   4 --
   5 -- This file is part of Open CASCADE Technology software library.
   6 --
   7 -- This library is free software; you can redistribute it and/or modify it under
   8 -- the terms of the GNU Lesser General Public License version 2.1 as published
   9 -- by the Free Software Foundation, with special exception defined in the file
  10 -- OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
  11 -- distribution for complete text of the license and disclaimer of any warranty.
  12 --
  13 -- Alternatively, this file may be used under the terms of Open CASCADE
  14 -- commercial license or contractual agreement.
  15
  16 class Application from AppStdL inherits Application from TDocStd
  17
  18 uses MessageDriver            from CDM,
  19      SequenceOfExtendedString from TColStd,
  20      ExtendedString           from TCollection
  21
  22 is
  23
  24     Create returns Application from AppStdL;
  25
  26     MessageDriver(me: mutable)
  27         returns MessageDriver from CDM
  28     is redefined;
  29
  30     Formats(me: mutable; theFormats: out SequenceOfExtendedString from TColStd)
  31     ---Purpose: returns supported format for application documents.
  32     is redefined;
  33
  34     ResourcesName (me: mutable)
  35     ---Purpose: returns   the file  name  which  contains  application
  36     --          resources
  37         returns CString from Standard;
  38
  39 fields
  40     myMessageDriver : MessageDriver from CDM;
  41
  42 end Application;