-----------------------------------------------------------------
function GetPos: Longint; virtual;
Возвращает значение текущей позиции потока. Это абстрактный метод, который должен переопределяться.
См. также: TStreamSeek.