1 // Copyright (c) 1999-2014 OPEN CASCADE SAS
3 // This file is part of Open CASCADE Technology software library.
5 // This library is free software; you can redistribute it and / or modify it
6 // under the terms of the GNU Lesser General Public version 2.1 as published
7 // by the Free Software Foundation, with special exception defined in the file
8 // OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
9 // distribution for complete text of the license and disclaimer of any warranty.
11 // Alternatively, this file may be used under the terms of Open CASCADE
12 // commercial license or contractual agreement.
14 #include <StepSelect_FloatFormat.ixx>
15 #include <Interface_FloatWriter.hxx>
20 StepSelect_FloatFormat::StepSelect_FloatFormat ()
21 : thezerosup (Standard_True) , themainform ("%E") ,
22 theformrange ("%f") , therangemin (0.1) , therangemax (1000.)
25 void StepSelect_FloatFormat::SetDefault (const Standard_Integer digits)
30 themainform.AssignCat ("%E");
31 theformrange.AssignCat ("%f");
34 char pourcent = '%'; char point = '.';
35 Sprintf(format, "%c%d%c%dE",pourcent,digits+2,point,digits);
36 themainform.AssignCat (format);
37 Sprintf(format, "%c%d%c%df",pourcent,digits+2,point,digits);
38 theformrange.AssignCat (format);
40 therangemin = 0.1; therangemax = 1000.;
41 thezerosup = Standard_True;
44 void StepSelect_FloatFormat::SetZeroSuppress (const Standard_Boolean mode)
45 { thezerosup = mode; }
47 void StepSelect_FloatFormat::SetFormat (const Standard_CString format)
48 { themainform.Clear(); themainform.AssignCat(format); }
51 void StepSelect_FloatFormat::SetFormatForRange
52 (const Standard_CString form, const Standard_Real R1, const Standard_Real R2)
54 theformrange.Clear(); theformrange.AssignCat(form);
55 therangemin = R1; therangemax = R2;
58 void StepSelect_FloatFormat::Format
59 (Standard_Boolean& zerosup, TCollection_AsciiString& mainform,
60 Standard_Boolean& hasrange, TCollection_AsciiString& formrange,
61 Standard_Real& rangemin, Standard_Real& rangemax) const
64 mainform = themainform;
65 hasrange = (theformrange.Length() > 0);
66 formrange = theformrange;
67 rangemin = therangemin;
68 rangemax = therangemax;
72 void StepSelect_FloatFormat::Perform
73 (IFSelect_ContextWrite& /*ctx*/,
74 StepData_StepWriter& writer) const
76 writer.FloatWriter().SetFormat (themainform.ToCString());
77 writer.FloatWriter().SetZeroSuppress (thezerosup);
78 if (theformrange.Length() > 0) writer.FloatWriter().SetFormatForRange
79 (theformrange.ToCString(), therangemin, therangemax);
82 TCollection_AsciiString StepSelect_FloatFormat::Label () const
84 TCollection_AsciiString lab("Float Format ");
85 if (thezerosup) lab.AssignCat(" ZeroSuppress");
86 lab.AssignCat (themainform);
87 if (theformrange.Length() > 0) {
89 Sprintf(mess,", in range %f %f %s",
90 therangemin,therangemax,theformrange.ToCString());