como obtener el modelo del boad con delphi 7

[[kurono]]

hola amigos del foro me pregunto como puedo obtener el modelo de mi board mediante una aplicacion de delphi 7 y visualisarlo en un edit

[[cHackAll]]

No encontré lo que buscas ni en el registro y dudo encontrar una API que te retorne la información que buscas, mayor aún fue mi asombro al no encontrar dicha información en el Administrador de Dispositivos del Güindos, entonces recordé que la BIOS realizaba una copia de si misma y algo de configuración en la memoria convencional en las antiguas PCs. Por lo tanto obtengo la información que buscas directamente desde allí.

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;

Saludos

[[kurono]]

ok gracias

[[kurono]]

hola amigo hackall nuevamente te agradesco por el codigo que me diste para obtener el modelo del board me funciono perfectamente pero si no es mucha molestia me gustaria saber tambien el tipo de socker del procesador

[javier.m866]

El fichero 'md.dll' que pones para descargar tiene un virus, por lo que no lo puedo utilizar, me pudieran indicar dónde descargarlo sin problemas. Gracias.

[javier.m866]

Está infestado con un virus y no sirve para descargarlo, necesito otra solución. salu2

[ecfisa]

Hola javier.m866 y bienvenido a los foros de Club Delphi.

Acabo de bajar el archivo para controlarlo y no encuentro ningún virus. ¿ Con que antivirus te está detectando una infección ?

Un saludo.

[javier.m866]

Utilizo la versión Kaspersky 6.4, me lo detecta al instante, pero para probar desactivé el antivirus, me descargué el fichero y corrí la aplicación, pero lo único que me devuelve son unos caracteres ilegibles, y al momento de volver a activar el antivirus me vuelve a detectar el virus.

[javier.m866]

HEUR:Trojan.Win32.Generic Este es el nombre que me dá el antivirus.

[javier.m866]

mi correo es javier.m866@gmail.com agradecería si me lo mandaran. Es el fichero md.dll Gracias.

[[escafandra]]

No parece que contenga virus.

En determinadas circunstancias un AV puede dar falsos positivos, sobre todo en un análisis heurístico. El método usado por cHackAll leyendo zonas de memoria poco comunes y no pertenecientes al espacio de direcciones del proceso actual, simplemente es sospechoso para un A.V. celoso.

Sin poder ver el código fuente no se puede decir donde está el detonante de la alarma. En ocasiones se puede esquivar.


Saludos.