Description | Hierarchy | Fields | Methods | Properties |
type TCustomFileWriter = class(TObject)
FFileStream: TFileStream; |
|
FModel: TCustomModel; |
|
FEvaluationType: TEvaluationType; |
procedure CloseFile; |
|
procedure OpenFile(const FileName: string); |
|
function File_Comment(const FileID: string): string; |
|
procedure WriteCommentLine(const Comment: string); |
|
class Function FortranDecimal(NumberString : string) : string; |
|
class function FixedFormattedInteger(const Value, Width: integer): string; |
|
class function FixedFormattedReal(const Value : double; const Width : integer) : string; |
|
class function FreeFormattedReal(const Value : double) : string; |
|
Constructor Create(AModel: TCustomModel; EvaluationType: TEvaluationType); virtual; |
|
procedure NewLine; |
|
procedure WriteFloat(const Value: double); |
|
procedure WriteF10Float(const Value: double); |
|
procedure WriteInteger(Const Value: integer); |
|
procedure WriteI10Integer(Const Value: integer; const ErrorID: string); |
|
procedure WriteI2Integer(Const Value: integer; const ErrorID: string); |
|
procedure WriteString(const Value: String); overload; |
|
procedure WriteString(const Value: AnsiString); overload; |
property Model: TCustomModel read FModel; |
FFileStream: TFileStream; |
|
name is the file that is created by |
FModel: TCustomModel; |
|
See Model. |
FEvaluationType: TEvaluationType; |
|
procedure CloseFile; |
|
See also
|
procedure OpenFile(const FileName: string); |
|
See also
|
function File_Comment(const FileID: string): string; |
|
|
procedure WriteCommentLine(const Comment: string); |
|
|
class Function FortranDecimal(NumberString : string) : string; |
|
the period as the decimal separator. |
class function FreeFormattedReal(const Value : double) : string; |
|
|
Constructor Create(AModel: TCustomModel; EvaluationType: TEvaluationType); virtual; |
|
Parameters
|
procedure NewLine; |
|
|
procedure WriteFloat(const Value: double); |
|
|
procedure WriteF10Float(const Value: double); |
|
procedure WriteInteger(Const Value: integer); |
|
|
procedure WriteI10Integer(Const Value: integer; const ErrorID: string); |
|
|
procedure WriteI2Integer(Const Value: integer; const ErrorID: string); |
|
|
procedure WriteString(const Value: String); overload; |
|
|
procedure WriteString(const Value: AnsiString); overload; |
|
property Model: TCustomModel read FModel; |
|
|