API:System.TExtended80Rec

Aus RAD Studio API Documentation
Wechseln zu: Navigation, Suche

Delphi

TExtended80Rec = packed record

C++

struct DECLSPEC_DRECORD TExtended80Rec
{
private:
#ifndef _WIN64
    Extended aExtended80;
#else /* _WIN64 */
    unsigned __int64 aExtended80Frac;
    UInt16 aExtended80Exp;
#endif /* _WIN64 */
    UInt8 __fastcall InternalGetBytes(unsigned Index);
    UInt16 __fastcall InternalGetWords(unsigned Index);
    void __fastcall InternalSetBytes(unsigned Index, const UInt8 Value);
    void __fastcall InternalSetWords(unsigned Index, const UInt16 Value);
    UInt8 __fastcall GetBytes(unsigned Index);
    UInt16 __fastcall GetWords(unsigned Index);
    unsigned __int64 __fastcall Get_Exp();
    unsigned __int64 __fastcall GetExp();
    unsigned __int64 __fastcall GetFrac();
    bool __fastcall GetSign();
    void __fastcall SetBytes(unsigned Index, const UInt8 Value);
    void __fastcall SetWords(unsigned Index, const UInt16 Value);
    void __fastcall Set_Exp(unsigned __int64 NewExp);
    void __fastcall SetExp(unsigned __int64 NewExp);
    void __fastcall SetFrac(unsigned __int64 NewFrac);
    void __fastcall SetSign(bool NewSign);
public:
    int __fastcall Exponent();
    Extended __fastcall Fraction();
    unsigned __int64 __fastcall Mantissa();
    __property bool Sign = {read=GetSign, write=SetSign};
    __property unsigned __int64 Exp = {read=GetExp, write=SetExp};
    __property unsigned __int64 _Exp = {read=Get_Exp, write=Set_Exp};
    __property unsigned __int64 Frac = {read=GetFrac, write=SetFrac};
    TFloatSpecial __fastcall SpecialType();
    void __fastcall BuildUp(const bool SignFlag, const unsigned __int64 Mantissa, const int Exponent);
    static TExtended80Rec __fastcall _op_Explicit(Extended a);
    __property UInt8 Bytes[unsigned Index] = {read=GetBytes, write=SetBytes};
    __property UInt16 Words[unsigned Index] = {read=GetWords, write=SetWords};
};

Eigenschaften

Typ Sichtbarkeit Quelle Unit Übergeordnet
record
struct
public
System.pas
System.hpp
System System

Beschreibung

Embarcadero Technologies verfügt zurzeit über keine zusätzlichen Informationen. Bitte unterstützen Sie uns bei der Dokumentation dieses Themas, indem Sie Ihre Kommentare auf der Diskussionsseite eingeben.