Jump to content
dmitrybv

programmatically determine the edition of RAD Studio 12.3

Recommended Posts

Hello,
How can I programmatically determine the edition of RAD Studio 12.3?
In the registry key Computer\HKEY_CURRENT_USER\Software\Embarcadero\BDS\23.0, there is no value named Edition.
I have the same question regarding RAD Studio 11.3 and 10.4.

Share this post


Link to post
4 minutes ago, Anders Melander said:

GetRTLVersion would be my guess.

The actual values appears to be undocumented though.

1. RTLVersion and RAD Studio Edition (Professional, Enterprise, Community Edition) are different concepts. 
2. RTLVersion for RAD Studio 12.3 cannot be called from an external program.

Share this post


Link to post
Just now, dmitrybv said:

1. RTLVersion and RAD Studio Edition (Professional, Enterprise, Community Edition) are different concepts. 
2. RTLVersion for RAD Studio 12.3 cannot be called from an external program.

Oh - You meant what version of RAD Studio is installed on the local system.

 

I think the InstalledUpdates registry key is the closest you can get. There's no guarantee that it's valid though since it's only informational.

Share this post


Link to post

I don't have an answer but the edition is in the license. And I don't think there is a public API to read it.

But if you run ddc32 with different small projects the messages can tell you something about this.

Share this post


Link to post

There is this small component I use for ages (CEVersionInfo) that takes the version info from the Delphi IDE. (Menu-Projects-Project Options-Version Info)

In the IDE I put the Delphi version name into the "Comments" field and in the program source you can use it just like: "myEdit.Text:=CEVersionInfo.Comments" 

 

I've searched the web for the component but only saw some sites where I didn't dare to click to..

I'm willing to publish the source because there is no copyright involved and it is quite small code.

 

It can take the following info fields:

  FCompanyname      :='<info not available>';
  FFileDescription  :='<info not available>';
  FFileVersion      :='<info not available>';
  FInternalname     :='<info not available>';
  FLegalCopyright   :='<info not available>';
  FLegalTradeMarks  :='<info not available>';
  FOriginalFilename :='<info not available>';
  FProductName      :='<info not available>';
  FProductVersion   :='<info not available>';
  FComments         :='<info not available>';
  FMajorVersion     :='<info not available>';
  FMinorVersion     :='<info not available>';
  FRelease          :='<info not available>';
  FBuild            :='<info not available>';

 

Share this post


Link to post

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now

×