TUTF8Scanner

type TUTF8Scanner = class

public

  constructor Create(); overload;

  destructor Destroy; override;

  function Next;

  property Done: Boolean; [r]

  procedure Reset;

  function Length;

  function FindIndex();

  function IsFindChar();

  procedure Replace();

  function CurrentCharAsUTF8;

  function CurrentCharAsUCS4;

  function CharToUnicode();

  function GenerateCaseStatement();

  procedure SeekPos();

  procedure DebugInfo;

  property FindChars: AnsiString; [w]

  property BytePos: Integer; [r]

  property CharPos: Integer; [r]

  property CharLength: Integer; [r]

  property UTF8String: AnsiString; [rw]

  property UTF8Chars []: AnsiString; default; [rw]

  property UCS4Chars []: UCS4Char; [rw]

end;

TUTF8Scanner

TObject