INDY 10编译不了..

Question

在indy10的sendmail的demo中:
procedure TIdReply.SetCode(const AValue: string);
var
  LMatchedReply: TIdReply;
begin
  EIdException.IfFalse(CheckIfCodeIsValid(AValue), Format(RSReplyInvalidCode, [AValue]));
  // Only check for duplicates if we are in a collection. NormalReply etc are not in collections
  // Also dont check FReplyTexts, as non members can be duplicates of members
  if Collection <> nil then begin
    LMatchedReply := TIdReplies(Collection).Find(AValue);
    EIdException.IfTrue((LMatchedReply <> nil) and (LMatchedReply <> Self)
     , 'Reply already exists for ' + AValue); {do not localize}
  end;
  FCode := AValue;
end;
[Error] IdReply.pas(275): Undeclared identifier: 'IfFalse'
[Error] IdReply.pas(280): Undeclared identifier: 'IfTrue'
[Fatal Error] IdCmdTCPServer.pas(180): Could not compile used unit 'IdReply.pas'搜索好久也找不到答案~~~
哪位高人好心帮一下忙啊?

Answer 1

不能给自己分......只好挂24小时了.

Answer 2

我也遇到这样的问题，这么解决的？