soBeginning, soCurrent, and soEnd are undeclared

Giganews Newsgroups
Subject: soBeginning, soCurrent, and soEnd are undeclared
Posted by:  Jon E. Scott (NOSPAMsuppo…@blueorbsoft.comNOSPAM)
Date: Wed, 8 Aug 2007

Trying to install latest Indy 10.1.22 snapshot into a Delphi 5 Ent. for
testing.  Building IndySystem50.dpk results in undeclared identifier errors
in IdGlobal.pas.  It seems soBeginning, soCurrent, and soEnd are not
declared anywhere in the Indy source.  What do I need to do to fix this?

function TIdBaseStream.Seek(Offset: Longint; Origin: Word): Longint;
var
  LSeek : TSeekOrigin;
begin
  case Origin of
    soFromBeginning : LSeek := soBeginning; <-- error
    soFromCurrent : LSeek := soCurrent; <-- error
    soFromEnd : LSeek := soEnd; <-- error
  else
    Result := 0;
    Exit;
  end;
  Result := IdSeek(Offset, LSeek) and $FFFFFFFF;
end;

Thanks,
Jon.

Replies