Вам нужно изменить ResTypeпараметр RT_RCDATAвместоPChar('RT_RCDATA')
f := TResourceStream.create(Hinstance, 'rights', RT_RCDATA);
RT_RCDATAОпределено в System.Typesблоке следующим
const
RT_RCDATA = PChar(10);
Таким образом, вы также можете использовать его так
f := TResourceStream.create(Hinstance, 'rights', PChar(10));