Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.07.18;
Скачать: CL | DM;

Вниз

Список всех видеорежимов...   Найти похожие ветки 

 
BoAlSe ©   (2005-05-21 17:52) [0]

Необходимо выдать список всех, поддерживаемых системой видеорежимов. Или хотябы определить, поддерживается ли какой-нибудь конкретный режим. Когда-то грузил с одного сайта исходник такой программы. Но сайт закрылся, а загруженный архив потерялся.


 
rOOse ©   (2005-05-21 18:04) [1]

procedure TForm1.FormCreate(Sender: TObject);
var
 i: Integer;
 DevMode : TDeviceMode;
begin
 i:=0;
 while EnumDisplaySettings(nil,i,DevMode) do
 begin
   with Devmode do
     ListBox1.Items.Add(Format("%dx%d %d Colors",
     [dmPelsWidth,dmPelsHeight,Int64(1) shl dmBitsperPel]));
   Inc(i);
 end;
end;



Страницы: 1 вся ветка

Текущий архив: 2005.07.18;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.024 c
14-1118909237
Gorlum
2005-06-16 12:07
2005.07.18
Помогите найти ответы


14-1118777623
Kerk
2005-06-14 23:33
2005.07.18
Кондуктора и не только...


3-1117878710
Peter_cc
2005-06-04 13:51
2005.07.18
Отображение мемо в Qreport


14-1119824025
Андрей Жук
2005-06-27 02:13
2005.07.18
Запись (музыки, фильмов etc) и пересылка CD по почте


3-1118217498
Юра
2005-06-08 11:58
2005.07.18
InterBase, 100тыс записей клиенту