Novo

Forum kao aplikacija na telefonu

Dodajte forum na početni ekran i koristite ga kao aplikaciju, sa menijem na dnu ekrana.

  • 2 odgovora
  • 3.333 pregleda

Najnovija ↓

Rezolucija 25.01.2003. u 12:38 · pre 289 meseci #1
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 :)
Potpis
Avram,
http://www.eyesburn.co.sr/
Re: Rezolucija 25.01.2003. u 13:47 · pre 289 meseci #2
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;
Potpis
Sve sto je besmislenije, utoliko je bolje.
Prijavite se da biste odgovorili u ovoj temi.PrijavaRegistracija

Premeštanje teme