Read/Write the Registry (Windows)

本文介绍了一个Java类库,展示了如何使用Java代码访问、读取、写入、删除Windows注册表中的键值。包括如何使用HKEY_CURRENT_USER和HKEY_LOCAL_MACHINE,以及如何读取字符串值、获取子键、创建新键、设置值和删除键值。
his technique was first seen in this post.

package com.rgagnon.howto;

import java.lang.reflect.InvocationTargetException;
import java.lang.reflect.Method;
import java.util.HashMap;
import java.util.Map;
import java.util.ArrayList;
import java.util.List;
import java.util.prefs.Preferences;

public class WinRegistry {
// inspired by
// http://javabyexample.wisdomplug.com/java-concepts/34-core-java/62-java-registry-wrapper.html
// http://www.snipcode.org/java/1-java/23-java-class-for-accessing-reading-and-writing-from-windows-registry.html
// http://snipplr.com/view/6620/accessing-windows-registry-in-java/
public static final int HKEY_CURRENT_USER = 0x80000001;
public static final int HKEY_LOCAL_MACHINE = 0x80000002;
public static final int REG_SUCCESS = 0;
public static final int REG_NOTFOUND = 2;
public static final int REG_ACCESSDENIED = 5;

private static final int KEY_ALL_ACCESS = 0xf003f;
private static final int KEY_READ = 0x20019;
private static Preferences userRoot = Preferences.userRoot();
private static Preferences systemRoot = Preferences.systemRoot();
private static Class<? extends Preferences> userClass = userRoot.getClass();
private static Method regOpenKey = null;
private static Method regCloseKey = null;
private static Method regQueryValueEx = null;
private static Method regEnumValue = null;
private static Method regQueryInfoKey = null;
private static Method regEnumKeyEx = null;
private static Method regCreateKeyEx = null;
private static Method regSetValueEx = null;
private static Method regDeleteKey = null;
private static Method regDeleteValue = null;

static {
try {
regOpenKey = userClass.getDeclaredMethod("WindowsRegOpenKey",
new Class[] { int.class, byte[].class, int.class });
regOpenKey.setAccessible(true);
regCloseKey = userClass.getDeclaredMethod("WindowsRegCloseKey",
new Class[] { int.class });
regCloseKey.setAccessible(true);
regQueryValueEx = userClass.getDeclaredMethod("WindowsRegQueryValueEx",
new Class[] { int.class, byte[].class });
regQueryValueEx.setAccessible(true);
regEnumValue = userClass.getDeclaredMethod("WindowsRegEnumValue",
new Class[] { int.class, int.class, int.class });
regEnumValue.setAccessible(true);
regQueryInfoKey = userClass.getDeclaredMethod("WindowsRegQueryInfoKey1",
new Class[] { int.class });
regQueryInfoKey.setAccessible(true);
regEnumKeyEx = userClass.getDeclaredMethod(
"WindowsRegEnumKeyEx", new Class[] { int.class, int.class,
int.class });
regEnumKeyEx.setAccessible(true);
regCreateKeyEx = userClass.getDeclaredMethod(
"WindowsRegCreateKeyEx", new Class[] { int.class,
byte[].class });
regCreateKeyEx.setAccessible(true);
regSetValueEx = userClass.getDeclaredMethod(
"WindowsRegSetValueEx", new Class[] { int.class,
byte[].class, byte[].class });
regSetValueEx.setAccessible(true);
regDeleteValue = userClass.getDeclaredMethod(
"WindowsRegDeleteValue", new Class[] { int.class,
byte[].class });
regDeleteValue.setAccessible(true);
regDeleteKey = userClass.getDeclaredMethod(
"WindowsRegDeleteKey", new Class[] { int.class,
byte[].class });
regDeleteKey.setAccessible(true);
}
catch (Exception e) {
e.printStackTrace();
}
}

private WinRegistry() { }

/**
* Read a value from key and value name
* @param hkey HKEY_CURRENT_USER/HKEY_LOCAL_MACHINE
* @param key
* @param valueName
* @return the value
* @throws IllegalArgumentException
* @throws IllegalAccessException
* @throws InvocationTargetException
*/
public static String readString(int hkey, String key, String valueName)
throws IllegalArgumentException, IllegalAccessException,
InvocationTargetException
{
if (hkey == HKEY_LOCAL_MACHINE) {
return readString(systemRoot, hkey, key, valueName);
}
else if (hkey == HKEY_CURRENT_USER) {
return readString(userRoot, hkey, key, valueName);
}
else {
throw new IllegalArgumentException("hkey=" + hkey);
}
}

/**
* Read value(s) and value name(s) form given key
* @param hkey HKEY_CURRENT_USER/HKEY_LOCAL_MACHINE
* @param key
* @return the value name(s) plus the value(s)
* @throws IllegalArgumentException
* @throws IllegalAccessException
* @throws InvocationTargetException
*/
public static Map<String, String> readStringValues(int hkey, String key)
throws IllegalArgumentException, IllegalAccessException,
InvocationTargetException
{
if (hkey == HKEY_LOCAL_MACHINE) {
return readStringValues(systemRoot, hkey, key);
}
else if (hkey == HKEY_CURRENT_USER) {
return readStringValues(userRoot, hkey, key);
}
else {
throw new IllegalArgumentException("hkey=" + hkey);
}
}

/**
* Read the value name(s) from a given key
* @param hkey HKEY_CURRENT_USER/HKEY_LOCAL_MACHINE
* @param key
* @return the value name(s)
* @throws IllegalArgumentException
* @throws IllegalAccessException
* @throws InvocationTargetException
*/
public static List<String> readStringSubKeys(int hkey, String key)
throws IllegalArgumentException, IllegalAccessException,
InvocationTargetException
{
if (hkey == HKEY_LOCAL_MACHINE) {
return readStringSubKeys(systemRoot, hkey, key);
}
else if (hkey == HKEY_CURRENT_USER) {
return readStringSubKeys(userRoot, hkey, key);
}
else {
throw new IllegalArgumentException("hkey=" + hkey);
}
}

/**
* Create a key
* @param hkey HKEY_CURRENT_USER/HKEY_LOCAL_MACHINE
* @param key
* @throws IllegalArgumentException
* @throws IllegalAccessException
* @throws InvocationTargetException
*/
public static void createKey(int hkey, String key)
throws IllegalArgumentException, IllegalAccessException,
InvocationTargetException
{
int [] ret;
if (hkey == HKEY_LOCAL_MACHINE) {
ret = createKey(systemRoot, hkey, key);
regCloseKey.invoke(systemRoot, new Object[] { new Integer(ret[0]) });
}
else if (hkey == HKEY_CURRENT_USER) {
ret = createKey(userRoot, hkey, key);
regCloseKey.invoke(userRoot, new Object[] { new Integer(ret[0]) });
}
else {
throw new IllegalArgumentException("hkey=" + hkey);
}
if (ret[1] != REG_SUCCESS) {
throw new IllegalArgumentException("rc=" + ret[1] + " key=" + key);
}
}

/**
* Write a value in a given key/value name
* @param hkey
* @param key
* @param valueName
* @param value
* @throws IllegalArgumentException
* @throws IllegalAccessException
* @throws InvocationTargetException
*/
public static void writeStringValue
(int hkey, String key, String valueName, String value)
throws IllegalArgumentException, IllegalAccessException,
InvocationTargetException
{
if (hkey == HKEY_LOCAL_MACHINE) {
writeStringValue(systemRoot, hkey, key, valueName, value);
}
else if (hkey == HKEY_CURRENT_USER) {
writeStringValue(userRoot, hkey, key, valueName, value);
}
else {
throw new IllegalArgumentException("hkey=" + hkey);
}
}

/**
* Delete a given key
* @param hkey
* @param key
* @throws IllegalArgumentException
* @throws IllegalAccessException
* @throws InvocationTargetException
*/
public static void deleteKey(int hkey, String key)
throws IllegalArgumentException, IllegalAccessException,
InvocationTargetException
{
int rc = -1;
if (hkey == HKEY_LOCAL_MACHINE) {
rc = deleteKey(systemRoot, hkey, key);
}
else if (hkey == HKEY_CURRENT_USER) {
rc = deleteKey(userRoot, hkey, key);
}
if (rc != REG_SUCCESS) {
throw new IllegalArgumentException("rc=" + rc + " key=" + key);
}
}

/**
* delete a value from a given key/value name
* @param hkey
* @param key
* @param value
* @throws IllegalArgumentException
* @throws IllegalAccessException
* @throws InvocationTargetException
*/
public static void deleteValue(int hkey, String key, String value)
throws IllegalArgumentException, IllegalAccessException,
InvocationTargetException
{
int rc = -1;
if (hkey == HKEY_LOCAL_MACHINE) {
rc = deleteValue(systemRoot, hkey, key, value);
}
else if (hkey == HKEY_CURRENT_USER) {
rc = deleteValue(userRoot, hkey, key, value);
}
if (rc != REG_SUCCESS) {
throw new IllegalArgumentException("rc=" + rc + " key=" + key + " value=" + value);
}
}

// =====================

private static int deleteValue
(Preferences root, int hkey, String key, String value)
throws IllegalArgumentException, IllegalAccessException,
InvocationTargetException
{
int[] handles = (int[]) regOpenKey.invoke(root, new Object[] {
new Integer(hkey), toCstr(key), new Integer(KEY_ALL_ACCESS) });
if (handles[1] != REG_SUCCESS) {
return handles[1]; // can be REG_NOTFOUND, REG_ACCESSDENIED
}
int rc =((Integer) regDeleteValue.invoke(root,
new Object[] {
new Integer(handles[0]), toCstr(value)
})).intValue();
regCloseKey.invoke(root, new Object[] { new Integer(handles[0]) });
return rc;
}

private static int deleteKey(Preferences root, int hkey, String key)
throws IllegalArgumentException, IllegalAccessException,
InvocationTargetException
{
int rc =((Integer) regDeleteKey.invoke(root,
new Object[] { new Integer(hkey), toCstr(key) })).intValue();
return rc; // can REG_NOTFOUND, REG_ACCESSDENIED, REG_SUCCESS
}

private static String readString(Preferences root, int hkey, String key, String value)
throws IllegalArgumentException, IllegalAccessException,
InvocationTargetException
{
int[] handles = (int[]) regOpenKey.invoke(root, new Object[] {
new Integer(hkey), toCstr(key), new Integer(KEY_READ) });
if (handles[1] != REG_SUCCESS) {
return null;
}
byte[] valb = (byte[]) regQueryValueEx.invoke(root, new Object[] {
new Integer(handles[0]), toCstr(value) });
regCloseKey.invoke(root, new Object[] { new Integer(handles[0]) });
return (valb != null ? new String(valb).trim() : null);
}

private static Map<String,String> readStringValues
(Preferences root, int hkey, String key)
throws IllegalArgumentException, IllegalAccessException,
InvocationTargetException
{
HashMap<String, String> results = new HashMap<String,String>();
int[] handles = (int[]) regOpenKey.invoke(root, new Object[] {
new Integer(hkey), toCstr(key), new Integer(KEY_READ) });
if (handles[1] != REG_SUCCESS) {
return null;
}
int[] info = (int[]) regQueryInfoKey.invoke(root,
new Object[] { new Integer(handles[0]) });

int count = info[2]; // count
int maxlen = info[3]; // value length max
for(int index=0; index<count; index++) {
byte[] name = (byte[]) regEnumValue.invoke(root, new Object[] {
new Integer
(handles[0]), new Integer(index), new Integer(maxlen + 1)});
String value = readString(hkey, key, new String(name));
results.put(new String(name).trim(), value);
}
regCloseKey.invoke(root, new Object[] { new Integer(handles[0]) });
return results;
}

private static List<String> readStringSubKeys
(Preferences root, int hkey, String key)
throws IllegalArgumentException, IllegalAccessException,
InvocationTargetException
{
List<String> results = new ArrayList<String>();
int[] handles = (int[]) regOpenKey.invoke(root, new Object[] {
new Integer(hkey), toCstr(key), new Integer(KEY_READ)
});
if (handles[1] != REG_SUCCESS) {
return null;
}
int[] info = (int[]) regQueryInfoKey.invoke(root,
new Object[] { new Integer(handles[0]) });

int count = info[2]; // count
int maxlen = info[3]; // value length max
for(int index=0; index<count; index++) {
byte[] name = (byte[]) regEnumKeyEx.invoke(root, new Object[] {
new Integer
(handles[0]), new Integer(index), new Integer(maxlen + 1)
});
results.add(new String(name).trim());
}
regCloseKey.invoke(root, new Object[] { new Integer(handles[0]) });
return results;
}

private static int [] createKey(Preferences root, int hkey, String key)
throws IllegalArgumentException, IllegalAccessException,
InvocationTargetException
{
return (int[]) regCreateKeyEx.invoke(root,
new Object[] { new Integer(hkey), toCstr(key) });
}

private static void writeStringValue
(Preferences root, int hkey, String key, String valueName, String value)
throws IllegalArgumentException, IllegalAccessException,
InvocationTargetException
{
int[] handles = (int[]) regOpenKey.invoke(root, new Object[] {
new Integer(hkey), toCstr(key), new Integer(KEY_ALL_ACCESS) });

regSetValueEx.invoke(root,
new Object[] {
new Integer(handles[0]), toCstr(valueName), toCstr(value)
});
regCloseKey.invoke(root, new Object[] { new Integer(handles[0]) });
}

// utility
private static byte[] toCstr(String str) {
byte[] result = new byte[str.length() + 1];

for (int i = 0; i < str.length(); i++) {
result[i] = (byte) str.charAt(i);
}
result[str.length()] = 0;
return result;
}
}

How to use it :

package com.rgagnon.howto;

public class WinRegistryTest {
public static void main(String args[]) throws Exception {
String value = "";

// IE Download directory (HKEY_CURRENT_USER)
value = WinRegistry.readString(
WinRegistry.HKEY_CURRENT_USER,
"Software\\Microsoft\\Internet Explorer",
"Download Directory");
System.out.println("IE Download directory = " + value);

// Query for Acrobat Reader installation path (HKEY_LOCAL_MACHINE)
value = WinRegistry.readString(
WinRegistry.HKEY_LOCAL_MACHINE,
"SOFTWARE\\Microsoft\\Windows\\CurrentVersion\\App Paths\\AcroRd32.exe",
"");
System.out.println("Acrobat Reader Path = " + value);

// Loop through installed JRE and print the JAVA_HOME value
// HKEY_LOCAL_MACHINE\SOFTWARE\JavaSoft\Java Runtime Environment
java.util.Map res1 = WinRegistry.readStringValues(
WinRegistry.HKEY_LOCAL_MACHINE,
"SOFTWARE\\Microsoft\\Windows NT\\CurrentVersion");
System.out.println(res1.toString());

java.util.List res2 = WinRegistry.readStringSubKeys(
WinRegistry.HKEY_LOCAL_MACHINE,
"SOFTWARE\\Microsoft\\Windows NT\\CurrentVersion");
System.out.println(res2.toString());

WinRegistry.createKey(
WinRegistry.HKEY_CURRENT_USER, "SOFTWARE\\rgagnon.com");
WinRegistry.writeStringValue(
WinRegistry.HKEY_CURRENT_USER,
"SOFTWARE\\rgagnon.com",
"HowTo",
"java");

// WinRegistry.deleteValue(
// WinRegistry.HKEY_CURRENT_USER,
// "SOFTWARE\\rgagnon.com", "HowTo");
// WinRegistry.deleteKey(
// WinRegistry.HKEY_CURRENT_USER,
// "SOFTWARE\\rgagnon.com\\");

System.out.println("Done." );
}
}


The output :

IE Download directory = C:\Documents and Settings\R閍l\Bureau
Acrobat Reader Path = C:\Program Files\Adobe\Acrobat 5.0\Reader\AcroRd32.exe
{SubVersionNumber=, CurrentBuild=1.511.1 () (snipped)...
[Accessibility, AeDebug, Asr, Classes, Compatibility, (snipped)...
Done.
FHidCtrl没有NumCheckedDevices属性,干脆我把JvHidControllerClass.pas前面的定义部分发给你,供你参考: unit JvHidControllerClass; {$DEFINE DEFAULT_JVCL_INC} {$I jvcl.inc} {$I windowsonly.inc} interface uses {$IFDEF UNITVERSIONING} JclUnitVersioning, {$ENDIF UNITVERSIONING} Windows, Messages, Classes, SysUtils, JvComponentBase, DBT, SetupApi, Hid, JvTypes; const // a version string for the component cHidControllerClassVersion = '1.0.35'; // strings from the registry for CheckOutByClass cHidNoClass = 'HIDClass'; type // forward declarations TJvHidDeviceController = class; TJvHidDevice = class; // the Event function declarations TJvHidEnumerateEvent = function(HidDev: TJvHidDevice; const Idx: Integer): Boolean of object; TJvHidPlugEvent = procedure(HidDev: TJvHidDevice) of object; TJvHidUnplugEvent = TJvHidPlugEvent; TJvHidDataEvent = procedure(HidDev: TJvHidDevice; ReportID: Byte; const Data: Pointer; Size: Word) of object; TJvHidDataErrorEvent = procedure(HidDev: TJvHidDevice; Error: DWORD) of object; // check out test function TJvHidCheckCallback = function(HidDev: TJvHidDevice): Boolean; stdcall; // open overlapped read or write file handle TJvHidOpenExMode = (omhRead, omhWrite); // the physical descriptor TJvPhysicalDescriptor = array of WORD; // all USB relevant driver entries in the registry TJvHidPnPInfo = class(TObject) private FDeviceID: DWORD; FDevicePath: string; FCapabilities: DWORD; FClassDescr: string; FClassGUID: string; FCompatibleIDs: TStringList; FConfigFlags: DWORD; FDeviceDescr: string; FDriver: string; FFriendlyName: string; FHardwareID: TStringList; FLowerFilters: TStringList; FMfg: string; FUpperFilters: TStringList; FAddress: string; FBusNumber: DWORD; FBusType: string; FCharacteristics: string; FDevType: DWORD; FEnumeratorName: string; FExclusive: DWORD; FLegacyBusType: DWORD; FLocationInfo: string; FPhysDevObjName: string; FSecuritySDS: string; FService: string; FUINumber: DWORD; FUINumberFormat: string; function GetRegistryPropertyString(PnPHandle: HDEVINFO; const DevData: TSPDevInfoData; Prop: DWORD): string; function GetRegistryPropertyStringList(PnPHandle: HDEVINFO; const DevData: TSPDevInfoData; Prop: DWORD): TStringList; function GetRegistryPropertyDWord(PnPHandle: HDEVINFO; const DevData: TSPDevInfoData; Prop: DWORD): DWORD; function GetCompatibleIDs: TStrings; function GetHardwareID: TStrings; function GetLowerFilters: TStrings; function GetUpperFilters: TStrings; public property DeviceID: DWORD read FDeviceID; property DevicePath: string read FDevicePath; // registry values property Capabilities: DWORD read FCapabilities; property ClassDescr: string read FClassDescr; property ClassGUID: string read FClassGUID; property CompatibleIDs: TStrings read GetCompatibleIDs; property ConfigFlags: DWORD read FConfigFlags; property DeviceDescr: string read FDeviceDescr; property Driver: string read FDriver; property FriendlyName: string read FFriendlyName; property HardwareID: TStrings read GetHardwareID; property LowerFilters: TStrings read GetLowerFilters; property Mfg: string read FMfg; property UpperFilters: TStrings read GetUpperFilters; property Address: string read FAddress; property BusNumber: DWORD read FBusNumber; property BusType: string read FBusType; property Characteristics: string read FCharacteristics; property DevType: DWORD read FDevType; property EnumeratorName: string read FEnumeratorName; property Exclusive: DWORD read FExclusive; property LegacyBusType: DWORD read FLegacyBusType; property LocationInfo: string read FLocationInfo; property PhysDevObjName: string read FPhysDevObjName; property SecuritySDS: string read FSecuritySDS; property Service: string read FService; property UINumber: DWORD read FUINumber; property UINumberFormat: string read FUINumberFormat; constructor Create(APnPHandle: HDEVINFO; ADevData: TSPDevInfoData; ADevicePath: PChar); destructor Destroy; override; end; // a thread helper class to implement TJvHidDevice.OnData TJvHidDeviceReadThread = class(TJvCustomThread) private FErr: DWORD; procedure DoData; procedure DoDataError; constructor CtlCreate(const Dev: TJvHidDevice); protected procedure Execute; override; public Device: TJvHidDevice; NumBytesRead: Cardinal; Report: array of Byte; constructor Create(CreateSuspended: Boolean); end; // the representation of a HID device TJvHidDevice = class(TObject) private // internal control variables FMyController: TJvHidDeviceController; FIsPluggedIn: Boolean; FIsCheckedOut: Boolean; FIsEnumerated: Boolean; FHidFileHandle: THandle; FHidOverlappedRead: THandle; FHidOverlappedWrite: THandle; FOvlRead: TOverlapped; FOvlWrite: TOverlapped; // internal properties part FAttributes: THIDDAttributes; FPnPInfo: TJvHidPnPInfo; FVendorName: WideString; FProductName: WideString; FPhysicalDescriptor: TJvPhysicalDescriptor; FPreparsedData: PHIDPPreparsedData; FSerialNumber: WideString; FLanguageStrings: TStringList; FNumInputBuffers: Integer; FNumOverlappedBuffers: Integer; FThreadSleepTime: Integer; FLinkCollection: array of THIDPLinkCollectionNode; FMaxDataListLength: ULONG; FMaxUsageListLength: ULONG; FMaxButtonListLength: ULONG; FReportTypeParam: THIDPReportType; FUsagePageParam: TUsage; FLinkCollectionParam: WORD; FUsageParam: TUsage; FData: TJvHidDataEvent; FDataError: TJvHidDataErrorEvent; FUnplug: TJvHidUnplugEvent; FHasReadWriteAccess: Boolean; FDataThread: TJvHidDeviceReadThread; FTag: Integer; // tells if access to device is allowed function IsAccessible: Boolean; procedure GetMax; // internal property implementors function GetDeviceStringAnsi(Idx: Byte): string; function GetDeviceStringUnicode(Idx: Byte): WideString; function GetLinkCollectionNode(Idx: WORD): THIDPLinkCollectionNode; function GetConfiguration: THIDDConfiguration; function GetPreparsedData: PHIDPPreparsedData; function GetCaps: THIDPCaps; function GetVendorName: WideString; function GetProductName: WideString; function GetSerialNumber: WideString; function GetPhysicalDescriptor: TJvPhysicalDescriptor; function GetLanguageStrings: TStrings; function GetOverlappedReadResult: DWORD; function GetOverlappedWriteResult: DWORD; procedure SetConfiguration(const Config: THIDDConfiguration); procedure SetDataEvent(const DataEvent: TJvHidDataEvent); procedure SetNumInputBuffers(const Num: Integer); procedure SetNumOverlappedBuffers(const Num: Integer); procedure SetReportTypeParam(const ReportType: THIDPReportType); procedure SetThreadSleepTime(const SleepTime: Integer); procedure SetUsagePageParam(const UsagePage: TUsage); procedure StartThread; procedure StopThread; // Constructor is hidden! Only a TJvHidDeviceController can create a TJvHidDevice object. // APnPInfo becomes the property of this class, do not try to free it yourself, // even if this call raises an exception. // The destructor of this class will take care of the cleanup even when an exception // is raised (as specified by the Delphi language) constructor CtlCreate(const APnPInfo: TJvHidPnPInfo; const Controller: TJvHidDeviceController); protected // internal event implementor procedure DoUnplug; public // dummy constructor constructor Create; destructor Destroy; override; // methods function CancelIO(const Mode: TJvHidOpenExMode): Boolean; procedure CloseFile; procedure CloseFileEx(const Mode: TJvHidOpenExMode); function DeviceIoControl(IoControlCode: DWORD; InBuffer: Pointer; InSize: DWORD; OutBuffer: Pointer; OutSize: DWORD; var BytesReturned: DWORD): Boolean; function FlushQueue: Boolean; function GetButtonCaps(ButtonCaps: PHIDPButtonCaps; var Count: WORD): NTSTATUS; function GetButtons(UsageList: PUsage; var UsageLength: ULONG; var Report; ReportLength: ULONG): NTSTATUS; function GetButtonsEx(UsageList: PUsageAndPage; var UsageLength: ULONG; var Report; ReportLength: ULONG): NTSTATUS; function GetData(DataList: PHIDPData; var DataLength: ULONG; var Report; ReportLength: ULONG): NTSTATUS; function GetFeature(var Report; const Size: Integer): Boolean; function GetScaledUsageValue(var UsageValue: Integer; var Report; ReportLength: ULONG): NTSTATUS; function GetSpecificButtonCaps(ButtonCaps: PHIDPButtonCaps; var Count: WORD): NTSTATUS; function GetSpecificValueCaps(ValueCaps: PHIDPValueCaps; var Count: WORD): NTSTATUS; function GetUsages(UsageList: PUsage; var UsageLength: ULONG; var Report; ReportLength: ULONG): NTSTATUS; function GetUsagesEx(UsageList: PUsageAndPage; var UsageLength: ULONG; var Report; ReportLength: ULONG): NTSTATUS; function GetUsageValue(var UsageValue: ULONG; var Report; ReportLength: ULONG): NTSTATUS; function GetUsageValueArray(UsageValue: PAnsiChar; UsageValueByteLength: WORD; var Report; ReportLength: ULONG): NTSTATUS; function GetValueCaps(ValueCaps: PHIDPValueCaps; var Count: WORD): NTSTATUS; function OpenFile: Boolean; function OpenFileEx(Mode: TJvHidOpenExMode): Boolean; function SetButtons(UsageList: PUsage; var UsageLength: ULONG; var Report; ReportLength: ULONG): NTSTATUS; function SetData(DataList: PHIDPData; var DataLength: ULONG; var Report; ReportLength: ULONG): NTSTATUS; function SetFeature(var Report; const Size: Integer): Boolean; function SetScaledUsageValue(UsageValue: Integer; var Report; ReportLength: ULONG): NTSTATUS; function SetUsages(UsageList: PUsage; var UsageLength: ULONG; var Report; ReportLength: ULONG): NTSTATUS; function SetUsageValue(UsageValue: ULONG; var Report; ReportLength: ULONG): NTSTATUS; function SetUsageValueArray(UsageValue: PAnsiChar; UsageValueByteLength: WORD; var Report; ReportLength: ULONG): NTSTATUS; function UnsetButtons(UsageList: PUsage; var UsageLength: ULONG; var Report; ReportLength: ULONG): NTSTATUS; function UnsetUsages(UsageList: PUsage; var UsageLength: ULONG; var Report; ReportLength: ULONG): NTSTATUS; function ReadFile(var Report; ToRead: DWORD; var BytesRead: DWORD): Boolean; function ReadFileEx(var Report; ToRead: DWORD; CallBack: TPROverlappedCompletionRoutine): Boolean; function WriteFile(var Report; ToWrite: DWORD; var BytesWritten: DWORD): Boolean; function WriteFileEx(var Report; ToWrite: DWORD; CallBack: TPROverlappedCompletionRoutine): Boolean; function CheckOut: Boolean; // Windows version dependent methods // added in Win 2000 function GetExtendedAttributes(ReportType: THIDPReportType; DataIndex: Word; Attributes: PHIDPExtendedAttributes; var LengthAttributes: ULONG): NTSTATUS; function InitializeReportForID(ReportType: THIDPReportType; ReportID: Byte; var Report; ReportLength: ULONG): NTSTATUS; // added in Win XP function GetInputReport(var Report; const Size: ULONG): Boolean; function SetOutputReport(var Report; const Size: ULONG): Boolean; // read only properties property Attributes: THIDDAttributes read FAttributes; property Caps: THIDPCaps read GetCaps; property HasReadWriteAccess: Boolean read FHasReadWriteAccess; property HidFileHandle: THandle read FHidFileHandle; property HidOverlappedRead: THandle read FHidOverlappedRead; property HidOverlappedWrite: THandle read FHidOverlappedWrite; property HidOverlappedReadResult: DWORD read GetOverlappedReadResult; property HidOverlappedWriteResult: DWORD read GetOverlappedWriteResult; property IsCheckedOut: Boolean read FIsCheckedOut; property IsPluggedIn: Boolean read FIsPluggedIn; property LanguageStrings: TStrings read GetLanguageStrings; property MaxButtonListLength: ULONG read FMaxButtonListLength; property MaxDataListLength: ULONG read FMaxDataListLength; property MaxUsageListLength: ULONG read FMaxUsageListLength; property PhysicalDescriptor: TJvPhysicalDescriptor read GetPhysicalDescriptor; property PnPInfo: TJvHidPnPInfo read FPnPInfo; property PreparsedData: PHIDPPreparsedData read GetPreparsedData; property ProductName: WideString read GetProductName; property SerialNumber: WideString read GetSerialNumber; property VendorName: WideString read GetVendorName; // read write properties property Configuration: THIDDConfiguration read GetConfiguration write SetConfiguration; property LinkCollectionParam: WORD read FLinkCollectionParam write FLinkCollectionParam; property NumInputBuffers: Integer read FNumInputBuffers write SetNumInputBuffers; property NumOverlappedBuffers: Integer read FNumOverlappedBuffers write SetNumOverlappedBuffers; property ReportTypeParam: THIDPReportType read FReportTypeParam write SetReportTypeParam; property Tag: Integer read FTag write FTag; property ThreadSleepTime: Integer read FThreadSleepTime write SetThreadSleepTime; property UsagePageParam: TUsage read FUsagePageParam write SetUsagePageParam; property UsageParam: TUsage read FUsageParam write FUsageParam; // indexed properties property DeviceStrings[Idx: Byte]: string read GetDeviceStringAnsi; property DeviceStringsUnicode[Idx: Byte]: WideString read GetDeviceStringUnicode; property LinkCollectionNodes[Idx: WORD]: THIDPLinkCollectionNode read GetLinkCollectionNode; // event properties property OnData: TJvHidDataEvent read FData write SetDataEvent; property OnDataError: TJvHidDataErrorEvent read FDataError write FDataError; property OnUnplug: TJvHidUnplugEvent read FUnplug write FUnplug; end; // controller class to manage all HID devices {$IFDEF RTL230_UP} [ComponentPlatformsAttribute(pidWin32 or pidWin64)] {$ENDIF RTL230_UP} TJvHidDeviceController = class(TJvComponent) private // internal properties part FHidGuid: TGUID; FArrivalEvent: TJvHidPlugEvent; FDeviceChangeEvent: TNotifyEvent; FEnumerateEvent: TJvHidEnumerateEvent; FDevDataEvent: TJvHidDataEvent; FDevDataErrorEvent: TJvHidDataErrorEvent; FDevUnplugEvent: TJvHidUnplugEvent; FRemovalEvent: TJvHidUnplugEvent; FDevThreadSleepTime: Integer; FVersion: string; FDummy: string; // internal list of all HID device objects FList: TList; // counters for the list FNumCheckedInDevices: Integer; FNumCheckedOutDevices: Integer; FNumUnpluggedDevices: Integer; // reentrancy FInDeviceChange: Boolean; FLParam: LPARAM; // window to catch WM_DEVICECHANGE FHWnd: HWND; // internal worker functions function CheckThisOut(var HidDev: TJvHidDevice; Idx: Integer; Check: Boolean): Boolean; procedure EventPipe(var Msg: TMessage); // internal event implementors procedure SetDeviceChangeEvent(const Notifier: TNotifyEvent); procedure SetEnumerate(const Enumerator: TJvHidEnumerateEvent); procedure SetDevThreadSleepTime(const DevTime: Integer); procedure SetDevData(const DataEvent: TJvHidDataEvent); procedure SetDevDataError(const DataErrorEvent: TJvHidDataErrorEvent); procedure SetDevUnplug(const Unplugger: TJvHidUnplugEvent); protected procedure DoArrival(HidDev: TJvHidDevice); procedure DoRemoval(HidDev: TJvHidDevice); procedure DoDeviceChange; function DoEnumerate(HidDev: TJvHidDevice; Idx: Integer): Boolean; public // normal constructor/destructor constructor Create(AOwner: TComponent); override; destructor Destroy; override; // methods to hand out HID device objects procedure CheckIn(var HidDev: TJvHidDevice); function CheckOut(var HidDev: TJvHidDevice): Boolean; function CheckOutByClass(var HidDev: TJvHidDevice; const ClassName: string): Boolean; function CheckOutByID(var HidDev: TJvHidDevice; const Vid, Pid: Integer): Boolean; function CheckOutByIndex(var HidDev: TJvHidDevice; const Idx: Integer): Boolean; function CheckOutByProductName(var HidDev: TJvHidDevice; const ProductName: WideString): Boolean; function CheckOutByVendorName(var HidDev: TJvHidDevice; const VendorName: WideString): Boolean; function CheckOutByCallback(var HidDev: TJvHidDevice; Check: TJvHidCheckCallback): Boolean; // methods to count HID device objects function CountByClass(const ClassName: string): Integer; function CountByID(const Vid, Pid: Integer): Integer; function CountByProductName(const ProductName: WideString): Integer; function CountByVendorName(const VendorName: WideString): Integer; function CountByCallback(Check: TJvHidCheckCallback): Integer; // iterate over the HID devices function Enumerate: Integer; class function HidVersion: string; // just to be complete the GUID property HidGuid: TGUID read FHidGuid; property NumCheckedInDevices: Integer read FNumCheckedInDevices; property NumCheckedOutDevices: Integer read FNumCheckedOutDevices; property NumUnpluggedDevices: Integer read FNumUnpluggedDevices; published property DevThreadSleepTime: Integer read FDevThreadSleepTime write SetDevThreadSleepTime default 100; property Version: string read FVersion write FDummy stored False; property OnArrival: TJvHidPlugEvent read FArrivalEvent write FArrivalEvent; // the iterator event property OnEnumerate: TJvHidEnumerateEvent read FEnumerateEvent write SetEnumerate; // the central event for HID device changes property OnDeviceChange: TNotifyEvent read FDeviceChangeEvent write SetDeviceChangeEvent; // these events are copied to TJvHidDevices on creation property OnDeviceData: TJvHidDataEvent read FDevDataEvent write SetDevData; property OnDeviceDataError: TJvHidDataErrorEvent read FDevDataErrorEvent write SetDevDataError; property OnDeviceUnplug: TJvHidUnplugEvent read FDevUnplugEvent write SetDevUnplug; property OnRemoval: TJvHidUnplugEvent read FRemovalEvent write FRemovalEvent; // to be callable at design time procedure DeviceChange; end; // helpers to check the HID function and method results function HidCheck(const RetVal: NTSTATUS): NTSTATUS; overload; function HidCheck(const RetVal: LongBool): LongBool; overload; function HidError(const RetVal: NTSTATUS): NTSTATUS; function HidErrorString(const RetVal: NTSTATUS): string; // to register the component in the palette procedure Register; {$IFDEF UNITVERSIONING} const UnitVersioning: TUnitVersionInfo = ( RCSfile: '$URL: https://jvcl.svn.sourceforge.net/svnroot/jvcl/tags/JVCL3_45/run/JvHidControllerClass.pas $'; Revision: '$Revision: 13102 $'; Date: '$Date: 2011-09-07 07:46:34 +0200 (mer., 07 sept. 2011) $'; LogPath: 'JVCL\run' ); {$ENDIF UNITVERSIONING} implementation uses JvResources; type EControllerError = class(EJVCLException); EHidClientError = class(EJVCLException); //=== these are declared inconsistent in Windows.pas =========================
09-20
评论
成就一亿技术人!
拼手气红包6.0元
还能输入1000个字符
 
红包 添加红包
表情包 插入表情
 条评论被折叠 查看
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值