Форум: "Система";
Текущий архив: 2002.06.03;
Скачать: [xml.tar.bz2];
ВнизКак получить информацию о видеоадаптере? Найти похожие ветки
← →
Devid (2002-03-09 20:49) [0]ПЛЗ! Скажите как?
← →
SDS (2002-03-09 21:29) [1]Функция выдает название видеокарты
function GetVideoCardName() : string;
var
DisplayDevice : TDisplayDevice;
dwFlags : DWORD;
begin
DisplayDevice.cb := sizeof(DisplayDevice);
dwFlags := 0;
try
EnumDisplayDevices(nil, 0, DisplayDevice , dwFlags);
Result := DisplayDevice.DeviceString;
except
Result := "";
end;
end;
Страницы: 1 вся ветка
Форум: "Система";
Текущий архив: 2002.06.03;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.005 c