Показать сообщение отдельно
Старый 04.05.2011, 18:14   #31
Рыцарь
 
Аватар для Morfik
 
Регистрация: 13.10.2009
Сообщений: 665
Сказал Спасибо: 38
Имеет 172 спасибок в 108 сообщенях
Morfik пока неопределено
По умолчанию

Цитата:
Сообщение от destructor Посмотреть сообщение
это баян стопицотлетний(вроде устаревший).
но есть свой плюс, можно получить мас сетевухи когда перехуканы реестры и драйвера.

наверное в винде еще можно нарыть аналогичных функций (через директХ можно получить инфу о твоей видеокарте?)


это был сарказм, лучше забей

Добавлено через 1 минуту
наверное самый труЪ метод, это тренероватся на чемто типа everest
а можно и посто имя видюшки дернуть
Код:
var  
  lpDisplayDevice: TDisplayDevice;  
  dwFlags: DWORD;  
  cc: DWORD;  
begin  
 form1.memo1.Clear;
 
 lpDisplayDevice.cb := sizeof(lpDisplayDevice);   
 
 dwFlags := 0;   
 
 cc:= 0;
 
 while EnumDisplayDevices(nil, cc, lpDisplayDevice , dwFlags) do   
 
   begin   
 
     Inc(cc);   

     form1.memo1.lines.add(lpDisplayDevice.DeviceString);
   end;
 
  
end;
в итоге пока имеем
EnumDisplayDevices
DeviceIoControl
GetAdaptersInfo

зы а еще для хеша можно дернуть общее кол-во озу GlobalMemoryStatus

Последний раз редактировалось Morfik, 04.05.2011 в 18:17.
Morfik вне форума   Ответить с цитированием