Delphi7 - Rozdzielczość

witam,
jak zmienić rozdziejczość w programie w Delphi?
Mam monitor ustawiony w rozdzielczości 1024x1280, co zrobić, żeby program uruchamiał się w rozdzielczości 800x600?

VAR
  dmScreenSettings : TDEVMODE;   // Screen settings (fullscreen, etc...)

ZeroMemory(@dmScreenSettings, SizeOf(dmScreenSettings));
WITH dmScreenSettings DO 
BEGIN              // SET parameters FOR the screen setting
   dmSize       := SizeOf(dmScreenSettings);
   dmPelsWidth  := Width;                    // Window width
   dmPelsHeight := Height;                   // Window height
   dmBitsPerPel := PixelDepth;               // Window color depth
   dmFields     := DM_PELSWIDTH OR DM_PELSHEIGHT OR DM_BITSPERPEL;
END;

ChangeDisplaySettings(Tdevmode(NIL^), 0);

heh a co z tym zrobić?? :/

Szczerze mówią, ja też nie wiem jak tego użyć; TVDEMODE to jakiś typ zmiennej?

marek218 napisał(a)

heh a co z tym zrobić?? :/

heh zaimplementować :>

BTW jesteś w pełni świadom, że chcesz zmieniać userowi rozdzielczość i rozpieprzać mu ikonki na pulpicie :> Osobiście po pierwszym uruchomieniu takiego programu zaraz bym go wywalił...

Właściwie, to nie pomyślałem o tym... :-D :-D