me respondo yo solo xd ya encontre la manera:
Código Delphi
[-]SetRegistryData(HKEY_CURRENT_USER,'Software\Microsoft\Windows\CurrentVersion\Explorer\','ShellState' ,rdBinary,#$1C#$00#$00#$00#$41#$08#$00#$00#$00#$00#$00#$00#$00#$00#$00#$00#$00#$00#$00#$00#$00#$00#$ 00#$00#$09#$00#$00#$00);
habia que añadir los caracteres
para que te guarde el valor tal y como tu lo metes lo posteo por si a alguien le sucede algo similar, saludos