[code cpp]

/* =========================================================================
* The following defines a private JVM interface that the JDK can query
* for the JVM version and capabilities. sun.misc.Version defines
* the methods for getting the VM version and its capabilities.
*
* When a new bit is added, the following should be updated to provide
* access to the new capability:
* HS: JVM_GetVersionInfo and Abstract_VM_Version class
* SDK: Version class
*
* Similary, a private JDK interface JDK_GetVersionInfo0 is defined for
* JVM to query for the JDK version and capabilities.
*
* When a new bit is added, the following should be updated to provide
* access to the new capability:
* HS: JDK_Version class
* SDK: JDK_GetVersionInfo0
*
* ==========================================================================
*/
typedef struct {
/* Naming convention of RE build version string: n.n.n[_uu[c]][-]-bxx */
unsigned int jvm_version; /* Consists of major, minor, micro (n.n.n) */
/* and build number (xx) */
unsigned int update_version : 8; /* Update release version (uu) */
unsigned int special_update_version : 8; /* Special update release version (c) */
unsigned int reserved1 : 16;
unsigned int reserved2;

/* The following bits represents JVM supports that JDK has dependency on.
* JDK can use these bits to determine which JVM version
* and support it has to maintain runtime compatibility.
*
* When a new bit is added in a minor or update release, make sure
* the new bit is also added in the main/baseline.
*/
unsigned int is_attachable : 1;
unsigned int : 31;
unsigned int : 32;
unsigned int : 32;
} jvm_version_info;

#define JVM_VERSION_MAJOR(version) ((version & 0xFF000000) >> 24)
#define JVM_VERSION_MINOR(version) ((version & 0x00FF0000) >> 16)
#define JVM_VERSION_MICRO(version) ((version & 0x0000FF00) >> 8)

/* Build number is available only for RE builds.
* It will be zero for internal builds.
*/
#define JVM_VERSION_BUILD(version) ((version & 0x000000FF))

JNIEXPORT void JNICALL
JVM_GetVersionInfo(JNIEnv* env, jvm_version_info* info, size_t info_size);

typedef struct {
// Naming convention of RE build version string: n.n.n[_uu[c]][-]-bxx
unsigned int jdk_version; /* Consists of major, minor, micro (n.n.n) */
/* and build number (xx) */
unsigned int update_version : 8; /* Update release version (uu) */
unsigned int special_update_version : 8; /* Special update release version (c)*/
unsigned int reserved1 : 16;
unsigned int reserved2;

/* The following bits represents new JDK supports that VM has dependency on.
* VM implementation can use these bits to determine which JDK version
* and support it has to maintain runtime compatibility.
*
* When a new bit is added in a minor or update release, make sure
* the new bit is also added in the main/baseline.
*/
unsigned int thread_park_blocker : 1;
unsigned int : 31;
unsigned int : 32;
unsigned int : 32;
} jdk_version_info;

#define JDK_VERSION_MAJOR(version) ((version & 0xFF000000) >> 24)
#define JDK_VERSION_MINOR(version) ((version & 0x00FF0000) >> 16)
#define JDK_VERSION_MICRO(version) ((version & 0x0000FF00) >> 8)

/* Build number is available only for RE build (i.e. JDK_BUILD_NUMBER is set to bNN)
* It will be zero for internal builds.
*/
#define JDK_VERSION_BUILD(version) ((version & 0x000000FF))

/*
* This is the function JDK_GetVersionInfo0 defined in libjava.so
* that is dynamically looked up by JVM.
*/
typedef void (*jdk_version_info_fn_t)(jdk_version_info* info, size_t info_size);


[/code]

以上的程式碼 是節錄於 http://12.101.252.19/hotspot/xref/src/share/vm/prims/jvm.h

其中有關 unsigned int : 31;
在DELPHI 要如何轉換成為PASCAL的格式
或是有哪位大大可以幫忙指導一下 DELPHI底下 要取得JVM的版本編號 要如何取得

抱歉小弟我還沒有用過發表文章的功能 上面的功能不會用

編輯記錄

如果這些是用來表示 bit field的話, 則

1536 unsigned int thread_park_blocker : 1;
1537 unsigned int : 31;
1538 unsigned int : 32;
1539 unsigned int : 32;

其中1536與1537應該合在一起, 宣告成一個 unsigned int

如 unsigned int A

使用時再使用位元運算解開來用,

thread_park_blocker := A and $1;
個人看法, 謹供參考......

編輯記錄

謝謝您提供的方向 我先試試看
有任何結果 我會第一時間提出

請將您的程式碼以程式碼區塊排版，謝謝。

------
不論是否我發的文，在能力範圍皆很樂意為大家回答問題。
為了補我的能力不足之處，以及讓答案可以被重複的使用，希望大家能儘量以公開的方式問問題。
在引述到我的文時自然會儘量替各位想辦法，謝謝大家！

不好意思 我是真的不會使用 在此在說聲抱歉

已將您的發表修改完畢，
請在發文需要貼上程式碼時，先在編輯的區塊中選擇程式碼區塊的其中一種語言，如您的發文為C ，請點選C ，然後在編輯內容的指示區塊中貼上您的程式碼。

------
不論是否我發的文，在能力範圍皆很樂意為大家回答問題。
為了補我的能力不足之處，以及讓答案可以被重複的使用，希望大家能儘量以公開的方式問問題。
在引述到我的文時自然會儘量替各位想辦法，謝謝大家！

真是煩勞大大了  真是感激
台灣還是很有人情味的