| Вопрос: видео карта | Добавлено: 08.05.04 15:04 |
Автор вопроса:  Novichek
|
|
Как узнать название видео карты (если это возможно)? Плз, дайте более полный ответ или пример. |
| Ответы | Всего ответов: 8 |
|
Номер ответа: 1 Автор ответа:  sne Разработчик Offline Client ICQ: 233286456 Вопросов: 34 Ответов: 5445 |
Web-сайт: Профиль | | #1 | Добавлено: 08.05.04 22:50 |
|
Из реестра не пробовал ? там в CurrentControlSet должно название прописываться... |
||
|
Номер ответа: 2 Автор ответа:  SharpЛидер форума ICQ: 216865379 Вопросов: 106 Ответов: 9979 |
Web-сайт: Профиль | | #2 | Добавлено: 09.05.04 15:15 |
|
Именно так. У меня, например, имя видюхи в HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Video\{CF649F91-E917-479E-85F8-3267F92C4A72}\0000\Device Description |
||
|
Номер ответа: 3 Автор ответа:  Novichek Вопросов: 19 Ответов: 60 |
Профиль | | #3 | Добавлено: 14.05.04 10:03 |
|
Извините, что долго не отвечал, инета не было P.S. Тут узнал, как hwinfo.exe пользоваться. Оказывается надо запускать с параметром hwinfo/ui |
||
Действительно, в реестре все есть, спасибо. |
Номер ответа: 4 Автор ответа:  LamerOnLineICQ: 334781088 Вопросов: 108 Ответов: 2822 |
Профиль | | #4 | Добавлено: 14.05.04 14:57 |
|
Через реестр узнаешь название, если надо конкретнее - подключай DirectX. Сможешь вытянуть название, параметры, список поддерживаемых режимов и т.п. Оба примера могу намылить (если узнаю мыло). |
||
|
Номер ответа: 5 Автор ответа: NovichekВопросов: 19 Ответов: 60 |
Профиль | | #5 | Добавлено: 17.05.04 09:43 |
|
скинь на Slaker2004@Mail.ru |
||
|
Номер ответа: 6 Автор ответа:  LamerOnLineICQ: 334781088 Вопросов: 108 Ответов: 2822 |
Профиль | | #6 | Добавлено: 17.05.04 09:56 |
|
Угу, ушло. |
||
|
Номер ответа: 7 Автор ответа: LamerOnLineICQ: 334781088 Вопросов: 108 Ответов: 2822 |
Профиль | | #7 | Добавлено: 18.05.04 11:35 |
|
Есть еще вариант Option Explicit Const CCDEVICENAME = 32 Const CCFORMNAME = 32 Const DM_PELSWIDTH = &H80000 Const DM_PELSHEIGHT = &H100000 Const CDS_TEST = &H4 Private Type DISPLAY_DEVICE cb As Long DeviceName As String * 32 DeviceString As String * 128 StateFlags As Long DeviceID As String * 128 DeviceKey As String * 128 End Type Private Declare Function EnumDisplayDevices Lib "user32" Alias "EnumDisplayDevicesA" (Unused As Any, ByVal iDevNum As Long, lpDisplayDevice As DISPLAY_DEVICE, ByVal dwFlags As Long) As Boolean Private Sub Form_Load() 'KPD-Team 2000 'URL: http://www.allapi.net/ 'E-Mail: KPDTeam@Allapi.net Dim DD As DISPLAY_DEVICE DD.cb = Len(DD) 'First retieve some display info If EnumDisplayDevices(ByVal 0&, 0, DD, ByVal 0&) Then 'and show it Me.AutoRedraw = True Me.Print "Device String:" + Left$(DD.DeviceString, InStr(1, DD.DeviceString, Chr$(0)) - 1) Me.Print "Device Name:" + Left$(DD.DeviceName, InStr(1, DD.DeviceName, Chr$(0)) - 1) Me.Print "Device Key:" + Left$(DD.DeviceKey, InStr(1, DD.DeviceKey, Chr$(0)) - 1) Me.Print "Device ID:" + Left$(DD.DeviceID, InStr(1, DD.DeviceID, Chr$(0)) - 1) Else Me.Print "Error while retrieving Display Information" End If End Sub |
||
|
Номер ответа: 8 Автор ответа:  NovichekВопросов: 19 Ответов: 60 |
Профиль | | #8 | Добавлено: 19.05.04 08:37 |
|
Спасибо за пример. Полезная вешчь |
||
Страница: 1 |