[Delphi] Определение типа видеокарты.

Develope

Develope

Эксперт
Регистрация
9 Ноя 2015
Сообщения
695
Реакции
441
Баллы
145
Код:
procedure TForm1.Button1Click(Sender: TObject);

var
   lpDisplayDevice: TDisplayDevice;
   dwFlags: DWORD;
   cc: DWORD;
begin
   lpDisplayDevice.cb := sizeof(lpDisplayDevice);
   dwFlags := 0;
   cc:= 0;
   while EnumDisplayDevices(nil, cc, lpDisplayDevice , dwFlags) do
      begin
        Inc(cc);
        memo1.lines.add(lpDisplayDevice.DeviceString);
      end;
end;
 
M

MrColT

Заблокирован
Регистрация
10 Фев 2014
Сообщения
4
Реакции
0
Баллы
65
Оригинально, однако :)
 
W

White-fox

Пользователь
Регистрация
17 Май 2015
Сообщения
2
Реакции
0
Баллы
50
Develope, Если вы ещё в этом шарите то есть больше инфы по видео карте или на Delphi только эти данные можно выудить?
 
Автор
Автор
Develope

Develope

Эксперт
Регистрация
9 Ноя 2015
Сообщения
695
Реакции
441
Баллы
145
Develope, Если вы ещё в этом шарите то есть больше инфы по видео карте или на Delphi только эти данные можно выудить?
Код не мой. Я слил данный код с соседнего борда.
 
C

CRIPTON

Заблокирован
Регистрация
6 Дек 2016
Сообщения
33
Реакции
8
Баллы
75
пробелов много
 
1ncog

1ncog

Эксперт
Регистрация
15 Авг 2014
Сообщения
614
Реакции
625
Баллы
135
CRIPTON, в чем проблема их удалить? В чем проблема вызвать функцию Trim?