Obtener Modelo de MotherBoard ó Placa Base

[javier.m866]

Hola, necesito un código en Delphi para averiguar el modelo de mi Motherboar (Sé que existe el Everest, Aida y otros) yo lo que quiero es un código hecho en ObjetPascal para Delphi7 que me devuelva en un Memo el código. Encontré en un foro uno así:....

Te bajas el adjunto, lo descomprimes (es una DLL) y la pruebas...
Código
Delphi
function GetData(var Data): LongBool;
stdcall;
external 'mb.dll';
var MotherBoard: array [0..87] of Char;
procedure TForm1.Button1Click(Sender: TObject);
begin
if GetData(MotherBoard) then Edit1.Text := MotherBoard;
end;

El código está bién, pero sucede que cuando intento bajar el archivo 'md.dll' El Kaspersky me alerta de la existencia de un virus (HEUR:Trojan.Win32.Generic Este es el nombre que me dá el antivirus.) Agradecería si me pueden mandar el archivo a mi usuario ó enviarme otro código que sirva para esto. Muchas gracias de antemano.

[[newtron]]

Hola.

Echale un vistazo a esto que tiene lo que buscas y bastantes más cosas.

Saludos

[javier.m866]

Sinceramente ese programa está bueno, pero ya está implementado, lo que necesito es las líneas de código para uno que estoy implementando yo.
Salu2

[javier.m866]

Veo que trae el código fuente, muchas gracias y disculpa mi corta lectura. Salu2

[[newtron]]

Nada hombre.

Saludos