Changeset 86 for trunk/Forms


Ignore:
Timestamp:
Jun 21, 2022, 5:04:48 PM (2 years ago)
Author:
chronos
Message:
  • Fixed: Calculation of tracks end.
  • Modified: Updated Common package to version 0.10.
  • Modified: Build with Lazarus 2.2.2.
  • Modified: Used Generics.Collections instead of fgl for generic lists.
Location:
trunk/Forms
Files:
5 edited

Legend:

Unmodified
Added
Removed

  • trunk/Forms/UFormImages.lfm

    r77 r86  
    88  ClientWidth = 1053
    99  DesignTimePPI = 144
    10   LCLVersion = '2.0.12.0'
     10  LCLVersion = '2.2.2.0'
    1111  object ImageLocomotive: TImage
    1212    Left = 48

  • trunk/Forms/UFormImages.pas

    r77 r86  
    11unit UFormImages;
    2 
    3 {$mode delphi}
    42
    53interface
    … …  
    3028  FormImages: TFormImages;
    3129
     30
    3231implementation
    3332

  • trunk/Forms/UFormMain.lfm

    r76 r86  
    1515  OnKeyUp = FormKeyUp
    1616  OnShow = FormShow
    17   LCLVersion = '2.0.12.0'
     17  LCLVersion = '2.2.2.0'
    1818  object PaintBox1: TPaintBox
    1919    Left = 0

  • trunk/Forms/UFormMain.lrj

    r76 r86  
    11{"version":1,"strings":[
    2 {"hash":156468095,"name":"tformmain.caption","sourcebytes":[66,105,103,32,77,101,116,114,111],"value":"Big Metro"}
     2{"hash":156468095,"name":"tformmain.caption","sourcebytes":[66,105,103,32,77,101,116,114,111],"value":"Big Metro"},
     3{"hash":93038270,"name":"tformmain.applicationinfo1.description","sourcebytes":[69,110,106,111,121,97,98,108,101,32,114,101,97,108,45,116,105,109,101,32,109,101,116,114,111,32,98,117,105,108,100,105,110,103,32,103,97,109,101,46],"value":"Enjoyable real-time metro building game."}
    34]}

  • trunk/Forms/UFormMain.pas

    r78 r86  
    11unit UFormMain;
    2 
    3 {$mode delphi}{$H+}
    42
    53interface
    … …  
    6866procedure TFormMain.FormCreate(Sender: TObject);
    6967const
    70   LinuxLanguagesDir = '/usr/share/BigMetro/languages';
    71 begin
    72   {$IFDEF Linux}
    73   // If installed in Linux system then use installation directory for po files
    74   if not DirectoryExists(Translator1.POFilesFolder) and DirectoryExists(LinuxLanguagesDir) then
    75     Translator1.POFilesFolder := LinuxLanguagesDir;
     68  UnixLanguagesDir = '/usr/share/BigMetro/languages';
     69begin
     70  {$IFDEF UNIX}
     71  // If installed in UNIX system then use installation directory for po files
     72  if not DirectoryExists(Translator1.POFilesFolder) and DirectoryExists(UnixLanguagesDir) then
     73    Translator1.POFilesFolder := UnixLanguagesDir;
    7674  {$ENDIF}
    7775
    … …  
    269267end;
    270268
    271 
    272269end.
    273270
Note: See TracChangeset for help on using the changeset viewer.