![]() Services := Locator.ConnectServer(wmiHost, 'root\cimv2', '', '', '','', 0, nil) Connect to the WMI service, with the root\cimv2 namespace ![]() Locator := CoSWbemLocator.Create // Create the Location object Var // These are all needed for the WMI querying process Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,ĭialogs, StdCtrls,WbemScripting_TLB,ActiveX įunction GetWMIstring (wmiHost, wmiClass, wmiProperty : string):string ![]() So my choose now is HDD Real serial number i am try this code below to get it but it didn'r work unit Unit2 ![]() I am trying to make delphi program Server And Client so To Secure my App and To Make Sure all user are under control i should give them a unique Key that can't be change to not lose them Handle, So i think it should be HDD Serial Number + Bios SN, but i remember that Bios Can Be Change When remove motherboard Battery so it will not be work. ![]()
0 Comments
Leave a Reply. |
AuthorWrite something about yourself. No need to be fancy, just an overview. ArchivesCategories |