Cómo instalar y utilizar la librería de components GLIBWMI

[YosvanyRL]

Como se instala la libreria?

[dec]

Hola a todos,

Yo diría que ya has instalado la librería correctamente... hay dos pruebas de ello: no obtienes errores, que, obtendrías de no haber instalado correctamente la librería. La otra prueba es que "GetArchitectureAsString" te retorna "x86", lo que puede ser correcto. En alguna ocasión, en este tipo de librerías, no obtienes los valores esperados, por ejemplo, porque el sistema / ordenador no los proporciona. Yo diría que este es el caso, y, no que no hayas podido instalar la librería. Prueba a ejecutar un programa de ejemplo (mostrando algunas de las propiedades que ya tratas de obtener) en otro ordenador, a ver si en ese caso sí obtienes datos.

[YosvanyRL]

abri el demo del procesador que trae el paquete del instalador y cogio todos los datos sin problemas.
de hecho no se porque salia arquitectura x86 ya que tengo w10 64bit que es como sale con tu demo desde delphi

[IMG]c:\Users\Administrator\Desktop\printscreen.JPG[/IMG]

[YosvanyRL]

me sale de esta manera
NOmbre: Win32_Processor
descripcion: Intel64 Family 6 Model 142 Stepping 9
arquitectura: x64
processor id: BFEBFBFF000806E9
socket: U3E1
family: 206

etc

[YosvanyRL]

este es la unit del software en que estoy probando como funciona

Código Delphi [-]
unit Unit1;

interface

uses
  Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics,
  Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.StdCtrls, CWMIBase,
  CProcessorInfo;

type
  TForm1 = class(TForm)
    ProcessorInfo1: TProcessorInfo;
    Edit1: TEdit;
    Button1: TButton;
    procedure Button1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin
Edit1.Text:=ProcessorInfo1.ProcessorProperties.DeviceID;
end;

end.

[dec]

Hola a todos,

Pues sí; es raro que el "demo" te ofrezca datos y no te los ofrezca el código que estás tratando de usar, pero, tienes que entender por dónde va mi respuesta: si no hubieses instalado correctamente la librería, no es ya que no obtuvieses datos, ¡es que tu código no compilaría siquiera! Por eso uno se atreve a decir que la librería se ha instalado correctamente, y que, es otra cosa la que no funciona como se espera.

La librería GLIBWMI puede descargarse desde la página del compañero Germán:

https://neftali.clubdelphi.com/componentes-glibwmi/

Hay un archivo "instalar.txt" que reza lo siquiente:

GLibWMI Component Library 1.8beta
===========================================================

INSTALAR / INSTALL
=======================

1) Instala la BPL que hay en el directorio de Lib para tu version de Dlephi:
Install the BPL for your Dephi version located in Lib directory:


2) Abre las demos y compilalas.
Open the demo prjects and compile it.

NOTA: Tal vez te haga falta añadir al path de las librerías al path de busqueda
Maybe you do need to add the path of libraries to search path

En efecto, he abierto el archivo "ProjectPackages.groupproj" desde Delphi, y, compilado e instalado la "GLibWMI.bpl". Nota que al hacer esto, creo que tú has dicho que no ocurre nada, pero, a mí me aparece un mensaje con los componentes que se han instalado:



Ese mensaje también deberías verlo tú al compilar / instalar la BPL en cuestión. También añadí en el "Library path" la ruta de la carpeta "sources", y, a continuación compilé y ejecuté la "demo" "ProcessorInfo", sin problemas, y, mostrándome la información esperada:



O sea... prueba a instalar de nuevo... asegúrate de que puedes ver el mensaje con los componentes instalados... cuando compiles / instales la librería. A continuación, he creado un "proyecto VCL" nuevo, y, he situado un componente "ProcessorInfo" en el formulario. En efecto, si pruebo tu código sin más, me ocurre lo mismo que a ti: no obtengo datos.

Pero... me he fijado en que dicho componente tiene una propiedad "Active"... que es "False" por defecto... si pongo esa propiedad a "True", en tiempo de diseño o de ejecución, ahora sí, obtengo los datos que se esperan. Y llegados a este punto... como sigo pensando que la librería la has instalado correctamente, tienes que revisar esta propiedad "Active" de que te hablo, y, asegurarte de que está en "True", antes de requerir la información que ofrece el componente en cuestión.

[dec]

Hola a todos,

Creo que puedes quedarte con la última parte de mi anterior mensaje:

Pero... me he fijado en que dicho componente tiene una propiedad "Active"... que es "False" por defecto... si pongo esa propiedad a "True", en tiempo de diseño o de ejecución, ahora sí, obtengo los datos que se esperan. Y llegados a este punto... como sigo pensando que la librería la has instalado correctamente, tienes que revisar esta propiedad "Active" de que te hablo, y, asegurarte de que está en "True", antes de requerir la información que ofrece el componente en cuestión.

Apuesto a que se trata de eso...