Changeset 194 for trunk/Locale.pas

Timestamp:

May 7, 2020, 8:39:24 PM (4 years ago)

Author:

chronos

Message:

• Fixed: Locale configuration in configuration was not working as expected. ModalResult of Ok and Cancel buttons was opposite. Selected locale was not applied during application startup.
• Fixed: Updating fullscreen mode after changeing mode in configuration window.

File:

• trunk/Locale.pas (modified) (2 diffs)

trunk/Locale.pas

@@ -111 +111 @@
 procedure TLocaleDlg.CancelBtnClick(Sender: TObject);
 begin
-  ModalResult := mrOk;
+  ModalResult := mrCancel;
 end;
 
@@ -161 +161 @@
 begin
   LocaleCode := Languages[List.ItemIndex].ShortName;
-  ModalResult := mrCancel;
+  ModalResult := mrOk;
 end;