Alter Mann hat mir
diese (also seine
) Komponenten empfohlen, um
WMI-Klassen auszulesen
Sie funktioieren auch ziemlich gut, zumindest in einer normalen Applikation.
Will ich jedoch das Forumlar mit den Komponenten nicht mehr in einer normalen App erstellen, sondern in eine
dll packen, bekomme ich bei dieser zeile
WMIDataset1.Execute;
folgende Fehlermeldung:
Zitat...
---------------------------
Debugger
Exception Notification
---------------------------
Project Project1.exe raised
exception class EOleSysError with message 'CoInitialize wurde nicht aufgerufen'. Process stopped. Use Step or Run to continue.
---------------------------
OK Help
---------------------------
Zumindest krieg ich die Fehlermeldung nicht, wenn ich diese Zeile ausklammere
Liegt der Fehler irgendwo bei mir, bei den Komponenten oder woanders?
Im Anhang die
DLL, wie das ganze gelöst wird.
Der Aufruf erfolgt so:
Delphi-Quellcode:
//...
procedure GetClassProperties(ClassName: PChar; PropertyCount: PInteger;
DeviceCount: PInteger; aProperties: Pointer); stdcall;
external 'F:\Chimaira\My Documents\Active Projects\NAMP\TVInterface\WMIDLL\WMIClass.dll';
//...
GetClassProperties('Win32_Processor', @PropCount, @DevCount, Result);
//...