Displaying the Server Version
Go Up to Displaying Server Properties
Use the Version
option to display the server version information. The TVersionInfo
record contains the server version, the implementation version, and the service version.
You can set the Version
option to <True> in the Object Inspector, or set the Options
property in code.
The following code displays server properties in Label
components when a button is clicked:
Options := [Version]; FetchVersionInfo; Label1.Caption := 'Server Version = ' + VersionInfo.ServerVersion; Label2.Caption := 'Server Implementation = ' + VersionInfo.ServerImplementation; Label3.Caption := 'Service Version = ' + IntToStr(VersionInfo.ServiceVersion); end;