Obtener Modelo de MotherBoard ó Placa Base
 

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.

Hola.

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

Saludos

Gracias Newtron
 

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

Disculpa
 

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

Nada hombre.

Saludos