diff --git a/examples/translation/localizedforms.lfm b/examples/translation/localizedforms.lfm
index b7929dbddf..875b94027d 100644
--- a/examples/translation/localizedforms.lfm
+++ b/examples/translation/localizedforms.lfm
@@ -4,5 +4,5 @@ object LocalizedForm: TLocalizedForm
Top = 238
Width = 320
Caption = 'LocalizedForm'
- LCLVersion = '1.5'
+ LCLVersion = '1.9.0.0'
end
diff --git a/examples/translation/localizedforms.pas b/examples/translation/localizedforms.pas
index 52c6ff02a5..adb4384950 100644
--- a/examples/translation/localizedforms.pas
+++ b/examples/translation/localizedforms.pas
@@ -133,6 +133,7 @@ begin
'pt' : Result := $0816; // Portuguese (Portugal)
'ru' : Result := $0419; // Russian
'tr' : Result := $041F; // Turkish
+ 'uk' : Result := $0422; // Ukrainian
'zh_cn', 'zh-cn': Result := $0804; // Chinese (China)
'zh_tw', 'zh-tw': Result := $0404; // Chinese (Taiwan)
// please complete if necessary. Language code and LCIDs can be found at
diff --git a/examples/translation/main.lfm b/examples/translation/main.lfm
index 100c2a60a8..a8b80fb954 100644
--- a/examples/translation/main.lfm
+++ b/examples/translation/main.lfm
@@ -21,6 +21,7 @@ inherited MainForm: TMainForm
Height = 23
Top = 13
Width = 100
+ DropDownCount = 16
ItemHeight = 15
Items.Strings = (
'de - deutsch'
@@ -31,6 +32,8 @@ inherited MainForm: TMainForm
'hu - magyar'
'it - Italiano'
'ru - русский'
+ 'uk - Ukrainian'
+ 'zh_CN - Chinese'
)
OnChange = CbLanguageChange
Style = csDropDownList
diff --git a/examples/translation/translation_demo.lpi b/examples/translation/translation_demo.lpi
index e1724e4c33..bc9a982608 100644
--- a/examples/translation/translation_demo.lpi
+++ b/examples/translation/translation_demo.lpi
@@ -99,7 +99,7 @@
-
+
diff --git a/examples/translation/translation_demo.res b/examples/translation/translation_demo.res
index bc23f8c77e..0ad004b9d9 100644
Binary files a/examples/translation/translation_demo.res and b/examples/translation/translation_demo.res differ