Use ampersand operator, Luke.
program Project2;
{$APPTYPE CONSOLE}
uses
System.TypInfo;
{$SCOPEDENUMS ON}
type
TEnums = (&TRY, &SHR, &XOR, &IS, &AS);
begin
WriteLn(GetEnumName(TypeInfo(TEnums), Ord(TEnums.SHR)));
WriteLn(GetEnumValue(TypeInfo(TEnums), 'shr'));
ReadLn;
end.
Output:
SHR
1