[ Crazy Mix @ 25.01.2003. 11:38 ] @
Da li neko zna kako da izvrsim "quiet" menjanje rezolucije, da bi mi npr. igra/program bila full screen? Ili postoji neki drugi nacin?

Nemojte mi reci da menjam velicinu svake komponente u runtime-u, zaklacu Vas
[ overflow @ 25.01.2003. 12:47 ] @
Ako sam te dobro razumeo sta ti treba ...
Prvo pokupi staru rezoluciju:
OldWidth := GetSystemMetrics(SM_CXSCREEN);
OldHeight := GetSystemMetrics(SM_CYSCREEN);

Pa pozovi:
SetScreenResolution(800, 600); // ili vec koja ti treba

Code:

function TfrmMain.SetScreenResolution(Width, Height: integer): Longint;
var
  DeviceMode: TDeviceMode;
begin
    with DeviceMode do 
    begin
      dmSize := SizeOf(TDeviceMode);
      dmPelsWidth := Width;
      dmPelsHeight := Height;
      dmFields := DM_PELSWIDTH or DM_PELSHEIGHT;
    end;
    Result := ChangeDisplaySettings(DeviceMode, CDS_UPDATEREGISTRY);
end;
[ Crazy Mix @ 25.01.2003. 12:58 ] @
Hvala, videcu da li radi, trebalo bi...