Hola,
la verdad yo usé el mismo código y me funcionó sin problemas.
Código Delphi
[-]
ShellExecute(Handle,'open',
PChar('rundll32.exe'),
PChar('C:\Windows\system32\shimgvw.dll,ImageView_Fullscreen C:\Users\Win7User\Pictures\Test.gif'),
nil, SW_SHOWNORMAL);
Primero hice un acceso directo en el escritorio para probar. Al crearlo le pase como parámetros:
Código:
rundll32.exe C:\Windows\system32\shimgvw.dll,ImageView_Fullscreen C:\Users\Win7User\Pictures\Test.gif
y funcionó correctamente.
Talvez lo que suceda es que tienes problemas con las rutas.
En el
foro de embarcadero tratan el tema de las rutas y en la documentación de microsoft puedes encontrar los
valores a las constantes CSIDL.