|
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.
__________________
Agradezco que ustedes me acompañen.
|