Установка видео-режима

Содержание материала

Страница 2 из 7

Установка видео-режима

После того как мы получим все доступные режимы, то установить желательный не составляет особого труда. Для этого мы воспользуемся функцией ChangeDisplaySettings. Так же данная функция при необходимости обновит реестр Windows.

Code:

procedure TForm1.Button1Click(Sender: TObject);

var

DevMode : TDeviceMode;

liRetValue : Longint;

begin

if EnumDisplaySettings

(nil,Listbox1.ItemIndex,Devmode) then

liRetValue := ChangeDisplaySettings

(DevMode, CDS_UPDATEREGISTRY);

SendMessage(HWND_BROADCAST,

WM_DISPLAYCHANGE,

SPI_SETNONCLIENTMETRICS,

0);

end;

Функция ChangeDisplaySettings возвращает значение long integer. Это значение можно использовать для определения успешности выполнения функции, сравнив со значениями из списка констант.

Внимание: Не рекомендуется устанавливать значение видео-режима, который не присутствует в списке доступных. Это может привести к мерцанию экрана либо вообще к исчезновению изображения.

Внимание: Многие адаптеры (особенно старые) могут не поддерживать смену разрешения без перезагрузки компьютера.

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

Новые статьи

Ранние статьи

Как установить разрешение экрана?

Получаем и устанавливаем различные режимы видео адаптера?

Получаем и устанавливаем различные режимы видео адаптера? - Установка видео-режима

Содержание материала