WMI - Obteniendo el numero de serie de la placa base.

[ecfisa]

Hola koiji.

Empezado por koiji

Hola ptorres pues no lo e podido probar usted cree que me pueda dar un ejemplo de uso para poder ver su funcionamiento porfabor Muchas Gracias por su ayuda

Bueno, si no lo has podido probar... debe ser difícil ver su funcionamiento

Con el permiso de ptorres, pongo un ejemplo del uso:
(File->New->Unit. (borrar, copiar y pegar el código de ptorres)

Código Delphi [-]
...
implementation

uses clSistema;

procedure TForm1.Button1Click(Sender: TObject);
begin
  with TBIOS.create do
  try
    Memo1.Clear;
    Memo1.Lines.Add(Fabricante);
    Memo1.Lines.Add(ProductoBase);
    Memo1.Lines.Add(VersionTarjeta);
    Memo1.Lines.Add(Fecha);
    Memo1.Lines.Add(Vendedor);
    Memo1.Lines.Add(VersionBios);
    Memo1.Lines.Add(FamiliaSistema);
    Memo1.Lines.Add(FabricanteSistema);
    Memo1.Lines.Add(NombreProducto);
    Memo1.Lines.Add(SKU);
    Memo1.Lines.Add(VersionSistema);
  finally
    Free;
  end;
end;

Saludos