diff --git a/Parsers/PascalABCParserNewSaushkin/ABCPascalParserTools.cs b/Parsers/PascalABCParserNewSaushkin/ABCPascalParserTools.cs
index e06794c74..2607e920c 100644
--- a/Parsers/PascalABCParserNewSaushkin/ABCPascalParserTools.cs
+++ b/Parsers/PascalABCParserNewSaushkin/ABCPascalParserTools.cs
@@ -224,6 +224,8 @@ namespace PascalABCSavParser
                 return string.Format(prefix + StringResources.Get("EXPECTEDBEGIN"), "'" + yytext + "'");
 
             var MaxTok = tokens.First();
+            if (yytext != null && yytext.ToLower() == "record" && MaxTok == "tkSealed")
+                return StringResources.Get("WRONG_ATTRIBUTE_FOR_RECORD");
 
             var ExpectedString = StringResources.Get("EXPECTED{1}");
 
diff --git a/bin/Lng/Eng/PascalABCParser.dat b/bin/Lng/Eng/PascalABCParser.dat
index e92f8383b..d77601c4d 100644
--- a/bin/Lng/Eng/PascalABCParser.dat
+++ b/bin/Lng/Eng/PascalABCParser.dat
@@ -8,6 +8,7 @@ EXPECTED{1}=expected {1}
 EXPECTEDR{1}=expected {1}
 EXPECTEDF{1}=expected {1}
 EXPECTEDBEGIN=declaration section or begin expected
+WRONG_ATTRIBUTE_FOR_RECORD=abstract, sealed, auto and static are not allowed for record
 
 WITHOUT_INIT_AND_SIZE=Size of dynamic array is passed
 
diff --git a/bin/Lng/Rus/PascalABCParser.dat b/bin/Lng/Rus/PascalABCParser.dat
index 6352fcf78..c8a02a726 100644
--- a/bin/Lng/Rus/PascalABCParser.dat
+++ b/bin/Lng/Rus/PascalABCParser.dat
@@ -8,7 +8,7 @@ EXPECTED{1}=ожидалось {1}
 EXPECTEDR{1}=ожидался {1}
 EXPECTEDF{1}=ожидалась {1}
 EXPECTEDBEGIN=ожидался раздел описаний или begin
-
+WRONG_ATTRIBUTE_FOR_RECORD=Модификаторы abstract, sealed, auto и static недопустимы для record
 WITHOUT_INIT_AND_SIZE=Пропущен размер динамического массива
 
 OPERATOR_NOT_IMPLEMET_TO_THIS_OPEAND_TYPE=Операция не применима к операндам данного типа
diff --git a/bin/Lng/Ukr/PascalABCParser.dat b/bin/Lng/Ukr/PascalABCParser.dat
index ee3c91289..fd491f1a2 100644
--- a/bin/Lng/Ukr/PascalABCParser.dat
+++ b/bin/Lng/Ukr/PascalABCParser.dat
@@ -8,6 +8,7 @@ EXPECTED{1}=очікувалося {1}
 EXPECTEDR{1}=очікувався {1}
 EXPECTEDF{1}=очікувалася {1}
 EXPECTEDBEGIN=очікувався розділ опису або begin
+WRONG_ATTRIBUTE_FOR_RECORD=Модификаторы abstract, sealed, auto и static недопустимы для record
 
 WITHOUT_INIT_AND_SIZE=Пропущений розмір динамічного масиву