diff --git a/components/csvdocument/csvdocument.pas b/components/csvdocument/csvdocument.pas
index abaedb865..7331ffb35 100644
--- a/components/csvdocument/csvdocument.pas
+++ b/components/csvdocument/csvdocument.pas
@@ -411,7 +411,7 @@ end;
 
 procedure TCSVParser.ParseValue;
 begin
-  while not ((FCurrentChar = FDelimiter) or EndOfFile or EndOfLine) do
+  while not ((FCurrentChar = FDelimiter) or EndOfLine or EndOfFile) do
   begin
     AppendStr(FWhitespaceBuffer, FCurrentChar);
     NextChar;