Alterar Resolução de Video
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...
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
Curtidas 0
Respostas

Tatuweb
04/06/2004
Use a função abaixo:
e chame assim:
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:
SetScreenResolution(800, 600);
GOSTEI 0

Crash
04/06/2004
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+
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+
GOSTEI 0

Tatuweb
04/06/2004
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.
: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.
GOSTEI 0

Crash
04/06/2004
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.
GOSTEI 0

Crash
04/06/2004
Sobe...
GOSTEI 0

Crash
04/06/2004
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.
Se alguem me ajudar eu agradeco.
GOSTEI 0