* Apply fix for bug #17291 as uploaded by reporter: Compiler generates a

    32 bit value for deciding between lookup table or key/value array,
	also on 64 bit processors.

git-svn-id: trunk@15916 -

rtl/inc/sstrings.inc

@@ -447,7 +447,7 @@ begin
           dec(ordinal,minvalue);
         end;
       {Get the address of the string.}
-      p:=Pshortstring((PPpointer(ord2strindex)+1+ordinal)^);
+      p:=Pshortstring((PPpointer(ord2strindex+sizeof(longint))+ordinal)^);
       if p=nil then
         exit;      {Invalid ordinal value for this enum.}
       s:=p^;