Как изменить разрешение экрана

[lionman]

Как изменить разрешение экрана программно. Например как в играх при включении программы разрешение экрана меняется, и окно растягивается на весь экран.

[Roof]

http://www.programmersclub.ru/simply-art-monitor/ - глянь, если не поймешь спроси, что не понял.

[mihali4]

Сообщение от lionman

Как изменить разрешение экрана программно. Например как в играх при включении программы разрешение экрана меняется, и окно растягивается на весь экран.

Странный народ... Все вроде бы выложено в открытый доступ - достаточно скачать мой справочник для форума...
Нет, продолжают заниматься самоистязанием...
Ответ из справочника:

Как узнать и поменять разрешение экрана

Поменять:

procedure ChangeDisplayResolution(x, y : word);
var
dm : TDEVMODE;
begin
ZeroMemory(@dm, sizeof(TDEVMODE));
dm.dmSize := sizeof(TDEVMODE);
dm.dmPelsWidth := x;
dm.dmPelsHeight := y;
dm.dmFields := DM_PELSWIDTH or DM_PELSHEIGHT;
ChangeDisplaySettings(dm, 0);
end;

Узнать можно также с помощью объекта Screen

Screen.Width
Screen.Height

[ToHuK13]

Поменять:

procedure ChangeDisplayResolution(x, y : word);
var
dm : TDEVMODE;
begin
ZeroMemory(@dm, sizeof(TDEVMODE));
dm.dmSize := sizeof(TDEVMODE);
dm.dmPelsWidth := x;
dm.dmPelsHeight := y;
dm.dmFields := DM_PELSWIDTH or DM_PELSHEIGHT;
ChangeDisplaySettings(dm, 0);
end;

ввел эту процедурй, в место х,у поставил нужное разрешение 1280х1024 но ничего не изменилоь! в чем дело?
надо ли вводить чтото дополнртельное или менять какие либо свойства формы?

[elda]

Странный народ... Дает программы которые не работают!!!

[raxp]

...археологией занимаетесь? ...если уж сказал, так опиши подробней чего не работает и где/

[Игорь22]

Сообщение от elda

Странный народ... Дает программы которые не работают!!!

нормальный код у меня всё работает!!!

[MyLastHit]

Игорь22, конечно работает. Просто те кто не знают еще как пользоваться функциями и процедурами, не должны думать как сменить разрешение экрана, лучше начать с:

for i:=1 to 10 do
writeln('Hello World');

По крайней мере я так думаю.