Changeset 647 for trunk/Packages/CevoComponents/ScreenTools.pas

Timestamp:

Feb 19, 2025, 9:18:32 AM (3 days ago)

Author:

chronos

Message:

• Modified: Detect data files usr/share/c-evo directory on Linux as relative directory to usr/bin directory.

File:

• trunk/Packages/CevoComponents/ScreenTools.pas (modified) (2 diffs)

trunk/Packages/CevoComponents/ScreenTools.pas

@@ -1609 +1609 @@
     else
     begin
-      Phrases2.LoadFromFile(HomeDir + 'Language2.txt');
+      Phrases2.LoadFromFile(GetAppShareFile('Language2.txt'));
       Phrases2FallenBackToEnglish := True;
     end;
@@ -1615 +1615 @@
   else
   begin
-    Phrases.LoadFromFile(HomeDir + 'Language.txt');
-    Phrases2.LoadFromFile(HomeDir + 'Language2.txt');
+    Phrases.LoadFromFile(GetAppShareFile('Language.txt'));
+    Phrases2.LoadFromFile(GetAppShareFile('Language2.txt'));
   end;