Hi,

I found a bug in registry.pp file.
I use fpc 1.0.10 release version. So It's possible that this is already fixed.

Change this line from:
  TRegDataType = (rdUnknown, rdString, rdExpandString, rdInteger, rdBinary);
to:
  TRegDataType = (rdUnknown, rdString, rdExpandString, rdBinary, rdInteger);
There is reference in defines.inc:
     REG_BINARY = 3;
     REG_DWORD = 4;
     REG_DWORD_LITTLE_ENDIAN = 4;
     REG_DWORD_BIG_ENDIAN = 5;
     REG_EXPAND_SZ = 2;
     REG_FULL_RESOURCE_DESCRIPTOR = 9;
     REG_LINK = 6;
     REG_MULTI_SZ = 7;
     REG_NONE = 0;
     REG_RESOURCE_LIST = 8;
     REG_RESOURCE_REQUIREMENTS_LIST = 10;
     REG_SZ = 1;

Tcc

I found a bug in registry.pp file. I use fpc 1.0.10 release version. So It's possible that this is already fixed.

I fixed it in the 1.9.x branch.