compiler: fix error message (was error message about resourcestring for property)

git-svn-id: trunk@26389 -

compiler/msg/errore.msg

@@ -398,7 +398,7 @@ scan_e_illegal_peoptflag=02094_E_Illegal argument for SETPEOPTFLAGS
 #
 # Parser
 #
-# 03334 is the last used one
+# 03335 is the last used one
 #
 % \section{Parser messages}
 % This section lists all parser messages. The parser takes care of the
@@ -1498,6 +1498,9 @@ parser_e_dir_not_allowed=03333_E_Directive "$1" not allowed here
 % is not allowed for instance methods or class operators.
 parser_e_no_assembler_in_generic=03334_E_Assembler blocks not allowed inside generics
 % The use of assembler blocks/routines is not allowed inside generics.
+parser_e_property_only_sgr=03335_E_Properties can be only static, global or inside structured types
+% Properties cannot be declared local, only global, using the static
+% directive or inside structured types.
 %
 %
 % \end{description}

compiler/msgidx.inc

@@ -432,6 +432,7 @@ const
   parser_e_not_allowed_in_record=03332;
   parser_e_dir_not_allowed=03333;
   parser_e_no_assembler_in_generic=03334;
+  parser_e_property_only_sgr=03335;
   type_e_mismatch=04000;
   type_e_incompatible_types=04001;
   type_e_not_equal_types=04002;
@@ -977,9 +978,9 @@ const
   option_info=11024;
   option_help_pages=11025;
 
-  MsgTxtSize = 70144;
+  MsgTxtSize = 70217;
 
   MsgIdxMax : array[1..20] of longint=(
-    26,95,335,121,88,56,126,27,202,64,
+    26,95,336,121,88,56,126,27,202,64,
     54,20,1,1,1,1,1,1,1,1
   );

compiler/pdecl.pas

@@ -886,7 +886,7 @@ implementation
       begin
          consume(_PROPERTY);
          if not(symtablestack.top.symtabletype in [staticsymtable,globalsymtable]) then
-           message(parser_e_resourcestring_only_sg);
+           message(parser_e_property_only_sgr);
          old_block_type:=block_type;
          block_type:=bt_const;
          repeat