Data.FmtBcd.TBcd

• Aller au parent : Data.FmtBcd
• Méthodes
• Champs

Delphi

  TBcd  = record
    Precision: Byte;                        { 1..64 }
    SignSpecialPlaces: Byte;                { Sign:1, Special:1, Places:6 }
    Fraction: packed array [0..31] of Byte; { BCD Nibbles, 00..99 per Byte, high Nibble 1st }
    class operator Implicit(const str: string): TBcd;
    class operator Implicit(const d: double): TBcd;
    class operator Implicit(const I: Integer): TBcd;
    class operator Explicit(const ABcd: TBcd): string;
    class operator Explicit(const ABcd: TBcd): Integer;
    class operator Add(const A, B: TBcd): TBcd;
    class operator Subtract(const A, B: TBcd): TBcd;
    class operator Multiply(const A, B: TBcd): TBcd;
    class operator Divide(const A, B: TBcd): TBcd;
    class operator Negative(const A: TBcd): TBcd;
    class operator Equal(const A, B: TBcd): Boolean;
    class operator NotEqual(const A, B: TBcd): Boolean;
    class operator GreaterThan(const A, B: TBcd): Boolean;
    class operator LessThan(const A, B: TBcd): Boolean;
    class operator GreaterThanOrEqual(const A, B: TBcd): Boolean;
    class operator LessThanOrEqual(const A, B: TBcd): Boolean;
  end;

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);
};

Propriétés

Type	Visibilité	Source	Unité	Parent
struct class	public	Data.FMTBcd.pas Data.FMTBcd.hpp	Data.FmtBcd	Data.FmtBcd

Description

TBcd stocke une valeur décimale codée en binaire.

TBcd représente une valeur décimale codée en binaire. Elle contient les champs suivants :

Champ	Contenu
Precision	Nombre de chiffres dans la version décimale de la valeur.
SignSpecialPlaces	Le bit de signe (0 pour positif, toute autre valeur pour négatif)
Fraction	Un tableau de quartets BCD, 00 à 99 par octet, quartet de poids fort en premier. Seuls les premiers quartets Precision sont utilisés.

Vous pouvez créer un Variant qui représente une valeur TBcd à l'aide de la fonction VarFMTBcdCreate. De fait, la façon la plus facile de manipuler des valeurs TBcd consiste à créer des Variants pour celles-ci puis à utiliser les opérateurs intégrés fournis par le type Variant.

Voir aussi

• Routines de support BCD

• Routines de support des variants