diff options
author | tobigun <tobigun@b956fd51-792f-4845-bead-9b4dfca2ff2c> | 2008-03-03 03:00:18 +0000 |
---|---|---|
committer | tobigun <tobigun@b956fd51-792f-4845-bead-9b4dfca2ff2c> | 2008-03-03 03:00:18 +0000 |
commit | 83c95e09f137e9984e7240fe629e8c819dfccbf4 (patch) | |
tree | c25d2d77a20480534ec8c34305009e7724cc68d0 /Game/Code/Classes/UConfig.pas | |
parent | dc1cf85b1ee9fea174c97293f23e8f384fce1fdc (diff) | |
download | usdx-83c95e09f137e9984e7240fe629e8c819dfccbf4.tar.gz usdx-83c95e09f137e9984e7240fe629e8c819dfccbf4.tar.xz usdx-83c95e09f137e9984e7240fe629e8c819dfccbf4.zip |
- actual.. -> current..
- USDX version-numbers in UConfig
- some windows/lclintf dependencies removed
- some indentation
git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@898 b956fd51-792f-4845-bead-9b4dfca2ff2c
Diffstat (limited to '')
-rw-r--r-- | Game/Code/Classes/UConfig.pas | 37 |
1 files changed, 35 insertions, 2 deletions
diff --git a/Game/Code/Classes/UConfig.pas b/Game/Code/Classes/UConfig.pas index f850b00f..ee4685d3 100644 --- a/Game/Code/Classes/UConfig.pas +++ b/Game/Code/Classes/UConfig.pas @@ -78,7 +78,7 @@ const // with IncludeConstants undefined and in UConfig.pas with // IncludeConstants defined (see the note above). {$DEFINE IncludeConstants} - + // include config-file (defines + constants) {$IF Defined(MSWindows)} {$I ../config-win.inc} @@ -96,7 +96,16 @@ const VERSION_MINOR = 1000; VERSION_RELEASE = 1; - (* + (* + * Current version of UltraStar Deluxe + *) + USDX_VERSION_MAJOR = 1; + USDX_VERSION_MINOR = 1; + USDX_VERSION_RELEASE = 0; + USDX_VERSION_STATE = 'Alpha'; + USDX_STRING = 'UltraStar Deluxe'; + + (* * FPC_VERSION is already defined as a macro by FPC itself. * You should use the built-in macros * FPC_VERSION (=PPC_MAJOR) @@ -181,6 +190,30 @@ const (PORTAUDIO_VERSION_RELEASE * VERSION_RELEASE); {$ENDIF} +function USDXVersionStr(): string; +function USDXShortVersionStr(): string; + implementation +uses + StrUtils; + +function USDXShortVersionStr(): string; +begin + Result := + USDX_STRING + + IfThen(USDX_VERSION_STATE <> '', ' '+USDX_VERSION_STATE); +end; + +function USDXVersionStr(): string; +begin + Result := + USDX_STRING + ' V ' + + IntToStr(USDX_VERSION_MAJOR) + '.' + + IntToStr(USDX_VERSION_MINOR) + '.' + + IntToStr(USDX_VERSION_RELEASE) + + IfThen(USDX_VERSION_STATE <> '', ' '+USDX_VERSION_STATE) + + ' Build'; +end; + end. |