API:System.TTextRec

• Up to Parent: System
• Fields

Delphi

  TTextRec = packed record (* must match the size the compiler generates: 730 bytes (754 bytes for x64) *)
    Handle: NativeInt;       (* must overlay with TFileRec *)
    Mode: Word;
    Flags: Word;
    BufSize: Cardinal;
    BufPos: Cardinal;
    BufEnd: Cardinal;
    BufPtr: _PAnsiChr;
    OpenFunc: Pointer;
    InOutFunc: Pointer;
    FlushFunc: Pointer;
    CloseFunc: Pointer;
    UserData: array[1..32] of Byte;
    Name: array[0..259] of WideChar;
    Buffer: TTextBuf;
    CodePage: Word;
    MBCSLength: ShortInt;
    MBCSBufPos: Byte;
    case Integer of
      0: (MBCSBuffer: array[0..5] of _AnsiChr);
      1: (UTF16Buffer: array[0..2] of WideChar);
  end;

C++

struct DECLSPEC_DRECORD TTextRec
{
public:
    NativeInt Handle;
    Word Mode;
    Word Flags;
    unsigned BufSize;
    unsigned BufPos;
    unsigned BufEnd;
    char *BufPtr;
    void *OpenFunc;
    void *InOutFunc;
    void *FlushFunc;
    void *CloseFunc;
    System::StaticArray<Byte, 32> UserData;
    System::StaticArray<WideChar, 260> Name;
    TTextBuf Buffer;
    Word CodePage;
    Int8 MBCSLength;
    Byte MBCSBufPos;
public:
    union
    {
        struct
        {
            System::StaticArray<WideChar, 3> UTF16Buffer;
        };
        struct
        {
            System::StaticArray<char, 6> MBCSBuffer;
        };
    };
};

Properties

Type	Visibility	Source	Unit	Parent
record struct	public	System.pas System.hpp	System	System

Description

Embarcadero Technologies does not currently have any additional information. Please help us document this topic by using the Discussion page!