Cambiar el THEME de Windows XP

[MAXIUM]

Me gustaría saber como cambiar el estilo visual de Windows XP, no me refiero al de mi aplicación sino al del sistema operativo (Theme) por código.

De antemano muchas gracias.

[MAXIUM]

Ok, resolví lo siguiente:

Código Delphi [-]
     WinExec(PChar('control desk.cpl desk,@Themes /Action:OpenTheme /File:"C:\WINDOWS\Resources\Themes\Windows Classic.theme"'), SW_NORMAL);
     SetForegroundWindow(FindWindow(nil, 'Propiedades de Pantalla'));
     keybd_event(VK_RETURN, 0, 0, 0);
     keybd_event(VK_RETURN, 0, KEYEVENTF_KEYUP, 0);

Funciona. Si alguien se anima a depurarlo, se agradece