Automatyczna zmiana rozdzielczości w Vista i Win7

Mam kod, który automatycznie zmienia rozdzielczość ekranu:

begin
  with Mode do
  begin
    dmSize:=SizeOf(Mode);

    dmPelsWidth:=1024;
    dmPelsHeight:=768;
    dmFields:=DM_PELSWIDTH+DM_PELSHEIGHT;
    ChangeDisplaySettings(Mode,0)
  end;
end; 

Moje pytanie brzmi, czy kod poprawnie zadziała pod Vistą i Win7?
Mam XP i tu wszystko działa. Nie mam niestety możliwości sprawdzenia tego pod Vistą i Win7.
Czy mogę prosić o wsparcie?

Windows 7 - działa :)

Pod Win7 HP x64 - resetuje kompa
Żartowałem, działa. :)

sprawdz pod msdn-em funkcję ChangeDisplaySettings i będziesz widział czy jest support do niej w win7.