- Timestamp:
- Feb 3, 2018, 8:51:28 PM (7 years ago)
- Location:
- trunk
- Files:
-
- 7 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk
- Property svn:ignore
-
old new 4 4 heaptrclog.trc 5 5 BigMetro.exe 6 *.dbg
-
- Property svn:ignore
-
trunk/BigMetro.lpi
r50 r52 18 18 <EnableI18N LFM="False"/> 19 19 </i18n> 20 <BuildModes Count=" 4">20 <BuildModes Count="2"> 21 21 <Item1 Name="Debug" Default="True"/> 22 22 <Item2 Name="Release"> … … 29 29 <IncludeFiles Value="$(ProjOutDir)"/> 30 30 <OtherUnitFiles Value="Forms"/> 31 <UnitOutputDirectory Value="lib/$(TargetCPU)-$(TargetOS) "/>31 <UnitOutputDirectory Value="lib/$(TargetCPU)-$(TargetOS)-$(BuildMode)"/> 32 32 </SearchPaths> 33 33 <Parsing> … … 49 49 <GenerateDebugInfo Value="False"/> 50 50 </Debugging> 51 <LinkSmart Value="True"/> 51 52 <Options> 52 53 <Win32> … … 55 56 </Options> 56 57 </Linking> 58 <Other> 59 <CompilerMessages> 60 <IgnoredMessages idx5024="True"/> 61 </CompilerMessages> 62 </Other> 57 63 </CompilerOptions> 58 64 </Item2> 59 <Item3 Name="Windows 32-bit">60 <CompilerOptions>61 <Version Value="11"/>62 <Target>63 <Filename Value="lib/$(TargetCPU)-$(TargetOS)/BigMetro"/>64 </Target>65 <SearchPaths>66 <IncludeFiles Value="$(ProjOutDir)"/>67 <OtherUnitFiles Value="Forms"/>68 <UnitOutputDirectory Value="lib/$(TargetCPU)-$(TargetOS)"/>69 </SearchPaths>70 <Parsing>71 <SyntaxOptions>72 <SyntaxMode Value="Delphi"/>73 <CStyleOperator Value="False"/>74 <AllowLabel Value="False"/>75 <CPPInline Value="False"/>76 </SyntaxOptions>77 </Parsing>78 <CodeGeneration>79 <SmartLinkUnit Value="True"/>80 <TargetCPU Value="i386"/>81 <TargetOS Value="win32"/>82 <Optimizations>83 <OptimizationLevel Value="3"/>84 </Optimizations>85 </CodeGeneration>86 <Linking>87 <Debugging>88 <GenerateDebugInfo Value="False"/>89 </Debugging>90 <Options>91 <Win32>92 <GraphicApplication Value="True"/>93 </Win32>94 </Options>95 </Linking>96 </CompilerOptions>97 </Item3>98 <Item4 Name="Windows 64-bit">99 <CompilerOptions>100 <Version Value="11"/>101 <Target>102 <Filename Value="lib/$(TargetCPU)-$(TargetOS)/BigMetro"/>103 </Target>104 <SearchPaths>105 <IncludeFiles Value="$(ProjOutDir)"/>106 <OtherUnitFiles Value="Forms"/>107 <UnitOutputDirectory Value="lib/$(TargetCPU)-$(TargetOS)"/>108 </SearchPaths>109 <Parsing>110 <SyntaxOptions>111 <SyntaxMode Value="Delphi"/>112 <CStyleOperator Value="False"/>113 <AllowLabel Value="False"/>114 <CPPInline Value="False"/>115 </SyntaxOptions>116 </Parsing>117 <CodeGeneration>118 <SmartLinkUnit Value="True"/>119 <TargetCPU Value="x86_64"/>120 <TargetOS Value="win64"/>121 <Optimizations>122 <OptimizationLevel Value="3"/>123 </Optimizations>124 </CodeGeneration>125 <Linking>126 <Debugging>127 <GenerateDebugInfo Value="False"/>128 </Debugging>129 <Options>130 <Win32>131 <GraphicApplication Value="True"/>132 </Win32>133 </Options>134 </Linking>135 </CompilerOptions>136 </Item4>137 65 </BuildModes> 138 66 <PublishOptions> … … 194 122 <IncludeFiles Value="$(ProjOutDir)"/> 195 123 <OtherUnitFiles Value="Forms"/> 196 <UnitOutputDirectory Value="lib/$(TargetCPU)-$(TargetOS) "/>124 <UnitOutputDirectory Value="lib/$(TargetCPU)-$(TargetOS)-$(BuildMode)"/> 197 125 </SearchPaths> 198 126 <Parsing> … … 216 144 <Debugging> 217 145 <UseHeaptrc Value="True"/> 146 <UseExternalDbgSyms Value="True"/> 218 147 </Debugging> 219 148 <Options> -
trunk/Install/win
-
Property svn:ignore
set to
*.exe
-
Property svn:ignore
set to
-
trunk/Install/win/BigMetro.iss
r47 r52 4 4 #define MyAppName "BigMetro" 5 5 #define MyAppNameShort "BigMetro" 6 #define MyAppVersion "1.0. 0"6 #define MyAppVersion "1.0.1" 7 7 #define MyAppPublisher "Chronosoft" 8 8 #define MyAppPublisherShort "Chronosoft" … … 53 53 54 54 [Files] 55 Source: "{#MyAppSubDir}\lib\x86_64-win64 \{#MyAppExeName}"; DestDir: "{app}"; Flags: ignoreversion; Check: Is64BitInstallMode56 Source: "{#MyAppSubDir}\lib\i386-win32 \{#MyAppExeName}"; DestDir: "{app}"; Flags: ignoreversion; Check: not Is64BitInstallMode55 Source: "{#MyAppSubDir}\lib\x86_64-win64-Release\{#MyAppExeName}"; DestDir: "{app}"; Flags: ignoreversion; Check: Is64BitInstallMode 56 Source: "{#MyAppSubDir}\lib\i386-win32-Release\{#MyAppExeName}"; DestDir: "{app}"; Flags: ignoreversion; Check: not Is64BitInstallMode 57 57 ;Source: "{#MyAppSubDir}\Languages\*.po"; DestDir: "{app}\Languages"; Flags: ignoreversion 58 58 -
trunk/Install/win/build.bat
r44 r52 1 @echo off 2 1 3 if not defined LAZDIR ( 2 4 set LAZDIR=C:\lazarus 3 5 ) 4 %LAZDIR%\lazbuild.exe --lazarusdir=%LAZDIR% --build-mode="Windows 32-bit" ..\..\BigMetro.lpi 5 %LAZDIR%\lazbuild.exe --lazarusdir=%LAZDIR% --build-mode="Windows 64-bit" ..\..\BigMetro.lpi 6 SET PROJECTNAME=BigMetro 6 7 7 "c:\Program Files (x86)\Inno Setup 5\ISCC.exe" "BigMetro.iss" 8 SET MAIN_EXE=..\..\%PROJECTNAME%.exe 9 SET WIN32_EXE=..\..\lib\i386-win32-Release\%PROJECTNAME%.exe 10 SET WIN64_EXE=..\..\lib\x86_64-win64-Release\%PROJECTNAME%.exe 11 IF EXIST %MAIN_EXE% del %MAIN_EXE% 12 IF EXIST %WIN32_EXE% del %WIN32_EXE% 13 IF EXIST %WIN64_EXE% del %WIN64_EXE% 14 15 %LAZDIR%\lazbuild.exe --lazarusdir=%LAZDIR% --build-mode="Release" --cpu=i386 --operating-system=Win32 ..\..\%PROJECTNAME%.lpi 16 copy %MAIN_EXE% %WIN32_EXE% 17 %LAZDIR%\lazbuild.exe --lazarusdir=%LAZDIR% --build-mode="Release" --cpu=x86_64 --operating-system=Win64 ..\..\%PROJECTNAME%.lpi 18 copy %MAIN_EXE% %WIN64_EXE% 19 20 "c:\Program Files (x86)\Inno Setup 5\ISCC.exe" "%PROJECTNAME%.iss" -
trunk/UEngine.pas
r49 r52 1322 1322 function TEngine.GetExistStationShapes: TStationShapeSet; 1323 1323 var 1324 I: Integer;1325 1324 Station: TMapStation; 1326 1325 begin … … 1530 1529 procedure TEngine.ComputeShapeDistance; 1531 1530 var 1532 I: Integer;1533 1531 S: TStationShape; 1534 1532 Station: TMapStation; … … 1773 1771 I: Integer; 1774 1772 J: Integer; 1775 Link1, Link2: TPoint;1773 //Link1, Link2: TPoint; 1776 1774 NewPoint: TPoint; 1777 1775 MetroLine: TMetroLine; … … 1798 1796 with Track.Points[I] do 1799 1797 if Assigned(Track.Points[I].LinkDown) and Assigned(Track.Points[I].LinkUp) then begin 1798 { 1800 1799 Link1 := (Track.Points[I].PositionDesigned + Track.Points[I].LinkDown.Shift) - 1801 1800 (Track.Points[I - 1].PositionDesigned + Track.Points[I].LinkDown.Shift); 1802 1801 if (I + 1) < Track.Points.Count then 1803 1802 Link2 := (Track.Points[I + 1].PositionDesigned + Track.Points[I].LinkUp.Shift) - 1804 1803 (Track.Points[I].PositionDesigned + Track.Points[I].LinkUp.Shift) 1805 1804 else Link2 := Link1; 1806 1805 1807 {if ArcTanPoint(Link1) = ArcTanPoint(Link2) then begin1806 if ArcTanPoint(Link1) = ArcTanPoint(Link2) then begin 1808 1807 // Parallel lines 1809 1808 NewPoint := Track.Points[I].PositionDesigned + Track.Points[I].LinkDown.Shift;
Note:
See TracChangeset
for help on using the changeset viewer.