Как определить тип чипсета??

Нужно написать мини прогу для определения типа чипсета!! замучался уже. Если кто знает где можно скачать исходник скажите, пожалуйста!!!
2 ответа

procedure TForm1.Button1Click(Sender: TObject); var ******,ECXstr,EDXstr: string[5]; begin asm mov eax,0 cpuid mov eax,0 cpuid mov dword ptr ******+1,*** mov byte ptr ******,4 mov dword ptr ECXstr+1,ECX mov byte ptr ECXstr,4 mov dword ptr EDXstr+1,EDX mov byte ptr EDXstr,4 end; form1.Label1.Caption:=******+ECXstr +EDXstr; end;


Большое спасибо!!!!!!!!!!!!!!!!