Data.FmtBcd.TBcd

• 親: Data.FmtBcd
• メソッド
• フィールド

Delphi

TBcd  = record

C++

struct DECLSPEC_DRECORD TBcd
{
public:
    System::Byte Precision;
    System::Byte SignSpecialPlaces;
    System::StaticArray<System::Byte, 32> Fraction;
    static TBcd __fastcall _op_Implicit(const System::UnicodeString str);
    static TBcd __fastcall _op_Implicit(const double d);
    static TBcd __fastcall _op_Implicit(const int I);
    static TBcd __fastcall _op_Addition(const TBcd &A, const TBcd &B);
    static TBcd __fastcall _op_Subtraction(const TBcd &A, const TBcd &B);
    static TBcd __fastcall _op_Multiply(const TBcd &A, const TBcd &B);
    static TBcd __fastcall _op_Division(const TBcd &A, const TBcd &B);
    static TBcd __fastcall _op_UnaryNegation(const TBcd &A);
    static bool __fastcall _op_Equality(const TBcd &A, const TBcd &B);
    static bool __fastcall _op_Inequality(const TBcd &A, const TBcd &B);
    static bool __fastcall _op_GreaterThan(const TBcd &A, const TBcd &B);
    static bool __fastcall _op_LessThan(const TBcd &A, const TBcd &B);
    static bool __fastcall _op_GreaterThanOrEqual(const TBcd &A, const TBcd &B);
    static bool __fastcall _op_LessThanOrEqual(const TBcd &A, const TBcd &B);
    TBcd& operator =(const System::UnicodeString str) { *this = TBcd::_op_Implicit(str); return *this; }
    TBcd& operator =(const double d) { *this = TBcd::_op_Implicit(d); return *this; }
    TBcd& operator =(const int I) { *this = TBcd::_op_Implicit(I); return *this; }
    friend TBcd operator +(const TBcd &A, const TBcd &B) { return TBcd::_op_Addition(A, B); }
    friend TBcd operator -(const TBcd &A, const TBcd &B) { return TBcd::_op_Subtraction(A, B); }
    friend TBcd operator *(const TBcd &A, const TBcd &B) { return TBcd::_op_Multiply(A, B); }
    friend TBcd operator /(const TBcd &A, const TBcd &B) { return TBcd::_op_Division(A, B); }
    TBcd operator -() { return TBcd::_op_UnaryNegation(*this); }
    friend bool operator ==(const TBcd &A, const TBcd &B) { return TBcd::_op_Equality(A, B); }
    friend bool operator !=(const TBcd &A, const TBcd &B) { return TBcd::_op_Inequality(A, B); }
    friend bool operator >(const TBcd &A, const TBcd &B) { return TBcd::_op_GreaterThan(A, B); }
    friend bool operator <(const TBcd &A, const TBcd &B) { return TBcd::_op_LessThan(A, B); }
    friend bool operator >=(const TBcd &A, const TBcd &B) { return TBcd::_op_GreaterThanOrEqual(A, B); }
    friend bool operator <=(const TBcd &A, const TBcd &B) { return TBcd::_op_LessThanOrEqual(A, B); }
};

プロパティ

種類	可視性	ソース	ユニット	親
record struct	public	Data.FmtBcd.pas Data.FMTBcd.hpp	Data.FmtBcd	Data.FmtBcd

説明

TBcd は 2 進化 10 進数値を格納します。

TBcd は、2 進化 10 進数値を表すものです。以下のフィールドが含まれます。

フィールド	内容
Precision	値を 10 進数で表現したときの桁数。
SignSpecialPlaces	符号ビット（0 なら正、それ以外の値なら負）。
Fraction	BCD ニブルの配列。バイトごとに 00 から 99 までの数を表し、上位ニブルが先にきます。最初の Precision ニブルしか使用しません。

VarFMTBcdCreate 関数を使用すると、TBcd 値を表すバリアントを作成することができます。実際に、TBcd 値を操作するには、その値を表すバリアントを作成し、バリアント型が提供する組み込みの操作を利用するのが一番簡単です。

関連項目

• BCD サポート ルーチン

• バリアント サポート ルーチン