diff --git a/source/main.pas b/source/main.pas
index 2c578ff7..fb89d7c1 100644
--- a/source/main.pas
+++ b/source/main.pas
@@ -942,7 +942,7 @@ procedure InheritFont(AFont: TFont);
 
 var
   MainForm            : TMainForm;
-  AppVersion          : String = 'x.y';
+  AppVersion          : String = '4.0';
   AppRevision         : String = '$Rev$';
   FullAppVersion      : String;
   DirnameCommonAppData,