Changeset 51

Timestamp:

Jan 11, 2017, 6:06:43 PM (8 years ago)

Author:

chronos

Message:

• Fixed: Loading of help.txt under Linux.

Location:

trunk

Files:

• LocalPlayer/Help.pas (modified) (1 diff)
• Messg.pas (modified) (1 diff)

trunk/LocalPlayer/Help.pas

@@ -212 +212 @@
 
   HelpText := TStringTable.Create;
-  HelpText.LoadFromFile(LocalizedFilePath('Help\help.txt'));
+  HelpText.LoadFromFile(LocalizedFilePath('Help' + DirectorySeparator + 'help.txt'));
   hADVHELP := HelpText.Gethandle('ADVHELP');
   hIMPHELP := HelpText.Gethandle('IMPHELP');

trunk/Messg.pas

@@ -126 +126 @@
       TButtonBase(Components[cix]).Graphic := GrExt[HGrSystem].Data;
       // if ButtonDownSound<>'*' then
-      // DownSound:=HomeDir+'Sounds\'+ButtonDownSound+'.wav';
+      // DownSound:=HomeDir+'Sounds' + DirectorySeparator + ButtonDownSound + '.wav';
       // if ButtonUpSound<>'*' then
-      // UpSound:=HomeDir+'Sounds\'+ButtonUpSound+'.wav';
+      // UpSound:=HomeDir+'Sounds' + DirectorySeparator + ButtonUpSound + '.wav';
       if Components[cix] is TButtonA then
         TButtonA(Components[cix]).Font := UniFont[ftButton];