Fórum Alterar Resolução de Video #236110

04/06/2004

0

Eu preciso de uma rotina que alterasse a resolução do video. Por exemplo:

Eu quero colocar a resolução em 400x300 ou uma resolução que eu escolher.

Não quero que minha aplicação se adapte à resolução.

t+ e brigadu...


Crash

Crash

Responder

Posts

04/06/2004

Tatuweb

Use a função abaixo:

1
2
3
4
5
6
7
8
9
10
11
12
function 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;


e chame assim:

1
SetScreenResolution(800, 600);



Responder

Gostei + 0

04/06/2004

Crash

O problema é: essa função só aceita alterar para resoluções que o windows relaciona.

Eu preciso de alterar para uma resolução qualquer. Por exemplo: 400x300.

Essa função usa API então não funciona.

Mesmo assim obrigado.

t+


Responder

Gostei + 0

04/06/2004

Tatuweb

Eu testei aqui a resolucao 400 x 300 com Win98 e funcionou na boa. Só se o problema é o monitor que não suporta ou o seu SO que não permite. Vc não inverteu os valores (botou 300 no lugar de 400 e vice-versa)??? Em todo caso aqui tem mais completa:

:arrow: http://www.delphifaq.com/fq/q2191.shtml

Olhe aqui tbm para ver possíveis erros retornados por esta função:
:arrow: http://www.swissdelphicenter.ch/torry/showcode.php?id=158

Digite no google [i:6370865cab]Screen Resolution Delphi [/i:6370865cab]que vc vai encontrar muitas outras.


Responder

Gostei + 0

05/06/2004

Crash

Eu testei aqui a resolucao 400 x 300 com Win98 e funcionou na boa. Só se o problema é o monitor que não suporta ou o seu SO que não permite. Vc não inverteu os valores (botou 300 no lugar de 400 e vice-versa)??? Em todo caso aqui tem mais completa: :arrow: http://www.delphifaq.com/fq/q2191.shtml Olhe aqui tbm para ver possíveis erros retornados por esta função: :arrow: http://www.swissdelphicenter.ch/torry/showcode.php?id=158 Digite no google [i:ab87c65c96]Screen Resolution Delphi [/i:ab87c65c96]que vc vai encontrar muitas outras.


O problema todo é esse: Eu preciso que altere mesmo se o SO não permitir.


Responder

Gostei + 0

08/06/2004

Crash

Sobe...


Responder

Gostei + 0

08/06/2004

Crash

O negocio é: eu estou fazendo um jogo e preciso que ele rode com resolucão mais baixa ou alta... de acordo com a velocidade da maquina da pessoa.

Se alguem me ajudar eu agradeco.


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar