Delphi : Incorrect comparison