java如何编辑注册表？

Question

1. if you are using WFC from VJ++, read
Manipulating the Windows Registry with WFC
http://msdn.microsoft.com/visualj/technical/tutorial/wfcregistry/default.asp2. On Microsoft's Java VM, the com.ms.lang package contains
these classes:
  RegKey
  RegKeyEnumValue
  RegKeyValueByteArray
  RegKeyValueInt
  RegKeyValueString
  RegKeyException
  RegKeyValueEnumerator
  RegQueryInfo

Answer 1

如果是纯正的Java需要通过JNI访问Windows注册表，因为这是一个特殊操作系统才具有的特征，Java不会有“函数”的。

Answer 2

这个程序是《Java核心技术》中的例子，你可以看看：

Answer 3

Win32RegKey.c的源程序：#include "Win32RegKey.h"
#include "Win32RegKeyNameEnumeration.h"
#include <string.h>
#include <stdlib.h>
#include <windows.h>JNIEXPORT jobject JNICALL Java_Win32RegKey_getValue
  (JNIEnv* env, jobject this_obj, jstring name)
{  const char* cname;
   jstring path;
   const char* cpath;
   HKEY hkey;
   DWORD type;
   DWORD size;
   jclass this_class;
   jfieldID id_root;
   jfieldID id_path;
   HKEY root;
   jobject ret;
   char* cret;   /* get the class */
   this_class = (*env)->GetObjectClass(env, this_obj);   /* get the field IDs */
   id_root = (*env)->GetFieldID(env, this_class, "root", "I");
   id_path = (*env)->GetFieldID(env, this_class, "path",
      "Ljava/lang/String;");   /* get the fields */
   root = (HKEY)(*env)->GetIntField(env, this_obj, id_root);
   path = (jstring)(*env)->GetObjectField(env, this_obj,
      id_path);
   cpath = (*env)->GetStringUTFChars(env, path, NULL);   /* open the registry key */
   if (RegOpenKeyEx(root, cpath, 0, KEY_READ, &hkey)
      != ERROR_SUCCESS)
   {  (*env)->ThrowNew(env,
         (*env)->FindClass(env, "Win32RegKeyException"),
         "Open key failed");
      (*env)->ReleaseStringUTFChars(env, path, cpath);
      return NULL;
   }   (*env)->ReleaseStringUTFChars(env, path, cpath);
   cname = (*env)->GetStringUTFChars(env, name, NULL);   /* find the type and size of the value */
   if (RegQueryValueEx(hkey, cname, NULL, &type, NULL, &size) != ERROR_SUCCESS)
   {  (*env)->ThrowNew(env,
         (*env)->FindClass(env, "Win32RegKeyException"),
         "Query value key failed");
      RegCloseKey(hkey);
      (*env)->ReleaseStringUTFChars(env, name, cname);
      return NULL;
   }   /* get memory to hold the value */
   cret = (char*)malloc(size);   /* read the value */
   if (RegQueryValueEx(hkey, cname, NULL, &type, cret, &size) != ERROR_SUCCESS)
   {  (*env)->ThrowNew(env,
         (*env)->FindClass(env, "Win32RegKeyException"),
         "Query value key failed");
      free(cret);
      RegCloseKey(hkey);
      (*env)->ReleaseStringUTFChars(env, name, cname);
      return NULL;
   }   /* depending on the type, store the value in a string,
      integer or byte array */
   if (type == REG_SZ)
   {  ret = (*env)->NewStringUTF(env, cret);
   }
   else if (type == REG_DWORD)
   {  jclass class_Integer = (*env)->FindClass(env,
         "java/lang/Integer");
      /* get the method ID of the constructor */
      jmethodID id_Integer = (*env)->GetMethodID(env,
         class_Integer, "<init>", "(I)V");
      int value = *(int*)cret;
      /* invoke the constructor */
      ret = (*env)->NewObject(env, class_Integer, id_Integer,
         value);
   }
   else if (type == REG_BINARY)
   {  ret = (*env)->NewByteArray(env, size);
      (*env)->SetByteArrayRegion(env, (jarray)ret, 0, size,
         cret);
   }
   else
   {  (*env)->ThrowNew(env,
         (*env)->FindClass(env, "Win32RegKeyException"),
         "Unsupported value type");
      ret = NULL;
   }   free(cret);
   RegCloseKey(hkey);
   (*env)->ReleaseStringUTFChars(env, name, cname);   return ret;
}// 待续

Answer 4

//继续（该死的CSDN，居然让我分开放！简直就是垃圾系统（MS的破东西））JNIEXPORT void JNICALL Java_Win32RegKey_setValue
  (JNIEnv* env, jobject this_obj, jstring name, jobject value)
{  const char* cname;
   jstring path;
   const char* cpath;
   HKEY hkey;
   DWORD type;
   DWORD size;
   jclass this_class;
   jclass class_value;
   jclass class_Integer;
   jfieldID id_root;
   jfieldID id_path;
   HKEY root;
   const char* cvalue;
   int ivalue;   /* get the class */
   this_class = (*env)->GetObjectClass(env, this_obj);   /* get the field IDs */
   id_root = (*env)->GetFieldID(env, this_class, "root", "I");
   id_path = (*env)->GetFieldID(env, this_class, "path",
      "Ljava/lang/String;");   /* get the fields */
   root = (HKEY)(*env)->GetIntField(env, this_obj, id_root);
   path = (jstring)(*env)->GetObjectField(env, this_obj,
      id_path);
   cpath = (*env)->GetStringUTFChars(env, path, NULL);   /* open the registry key */
   if (RegOpenKeyEx(root, cpath, 0, KEY_WRITE, &hkey)
      != ERROR_SUCCESS)
   {  (*env)->ThrowNew(env,
         (*env)->FindClass(env, "Win32RegKeyException"),
         "Open key failed");
      (*env)->ReleaseStringUTFChars(env, path, cpath);
      return;
   }   (*env)->ReleaseStringUTFChars(env, path, cpath);
   cname = (*env)->GetStringUTFChars(env, name, NULL);   class_value = (*env)->GetObjectClass(env, value);
   class_Integer = (*env)->FindClass(env, "java/lang/Integer");
   /* determine the type of the value object */
   if ((*env)->IsAssignableFrom(env, class_value,
      (*env)->FindClass(env, "java/lang/String")))
   {  /* it is a string--get a pointer to the characters */
      cvalue = (*env)->GetStringUTFChars(env, (jstring)value,
         NULL);
      type = REG_SZ;
      size = (*env)->GetStringLength(env, (jstring)value) + 1;
   }
   else if ((*env)->IsAssignableFrom(env, class_value,
      class_Integer))
   {  /* it is an integer--call intValue to get the value */
      jmethodID id_intValue = (*env)->GetMethodID(env,
         class_Integer, "intValue", "()I");
      ivalue = (*env)->CallIntMethod(env, value, id_intValue);
      type = REG_DWORD;
      cvalue = (char*)&ivalue;
      size = 4;
   }
   else if ((*env)->IsAssignableFrom(env, class_value,
      (*env)->FindClass(env, "[B")))
   {  /* it is a byte array--get a pointer to the bytes */
      type = REG_BINARY;
      cvalue = (char*)(*env)->GetByteArrayElements(env,
         (jarray)value, NULL);
      size = (*env)->GetArrayLength(env, (jarray)value);
   }
   else
   {  /* we don't know how to handle this type */
      (*env)->ThrowNew(env,
         (*env)->FindClass(env, "Win32RegKeyException"),
         "Unsupported value type");
      RegCloseKey(hkey);
      (*env)->ReleaseStringUTFChars(env, name, cname);
      return;
   }   /* set the value */
   if (RegSetValueEx(hkey, cname, 0, type, cvalue, size)
      != ERROR_SUCCESS)
   {  (*env)->ThrowNew(env,
         (*env)->FindClass(env, "Win32RegKeyException"),
         "Query value key failed");
   }   RegCloseKey(hkey);
   (*env)->ReleaseStringUTFChars(env, name, cname);   /* if the value was a string or byte array, release the
      pointer */
   if (type == REG_SZ)
   {  (*env)->ReleaseStringUTFChars(env, (jstring)value,
         cvalue);
   }
   else if (type == REG_BINARY)
   {  (*env)->ReleaseByteArrayElements(env, (jarray)value,
         (byte*)cvalue, 0);
   }
}static int startNameEnumeration(JNIEnv* env, jobject this_obj,
   jclass this_class)
/* helper function to start enumeration of names
*/
{  jfieldID id_index;
   jfieldID id_count;
   jfieldID id_root;
   jfieldID id_path;
   jfieldID id_hkey;
   jfieldID id_maxsize;   HKEY root;
   jstring path;
   const char* cpath;
   HKEY hkey;
   int maxsize = 0;
   int count = 0;   /* get the field IDs */
   id_root = (*env)->GetFieldID(env, this_class, "root", "I");
   id_path = (*env)->GetFieldID(env, this_class, "path",
      "Ljava/lang/String;");
   id_hkey = (*env)->GetFieldID(env, this_class, "hkey", "I");
   id_maxsize = (*env)->GetFieldID(env, this_class, "maxsize",
      "I");
   id_index = (*env)->GetFieldID(env, this_class, "index",
      "I");
   id_count = (*env)->GetFieldID(env, this_class, "count",
      "I");   /* get the field values */
   root = (HKEY)(*env)->GetIntField(env, this_obj, id_root);
   path = (jstring)(*env)->GetObjectField(env, this_obj,
      id_path);
   cpath = (*env)->GetStringUTFChars(env, path, NULL);   /* open the registry key */
   if (RegOpenKeyEx(root, cpath, 0, KEY_READ, &hkey)
      != ERROR_SUCCESS)
   {  (*env)->ThrowNew(env,
        (*env)->FindClass(env, "Win32RegKeyException"),
         "Open key failed");
      (*env)->ReleaseStringUTFChars(env, path, cpath);
      return -1;
   }
   (*env)->ReleaseStringUTFChars(env, path, cpath);   /* query count and max length of names */
   if (RegQueryInfoKey(hkey, NULL, NULL, NULL, NULL,
      NULL, NULL, &count, &maxsize, NULL, NULL, NULL)
      != ERROR_SUCCESS)
   {  (*env)->ThrowNew(env,
        (*env)->FindClass(env, "Win32RegKeyException"),
         "Query info key failed");
      return -1;
   }
//还要分？？待续