- Timestamp:
- Jan 14, 2025, 12:35:35 PM (7 days ago)
- Location:
- trunk
- Files:
-
- 4 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/Forms/FormMain.lfm
r143 r154 15 15 OnKeyUp = FormKeyUp 16 16 OnShow = FormShow 17 LCLVersion = ' 2.2.6.0'17 LCLVersion = '3.6.0.0' 18 18 object PaintBox1: TPaintBox 19 19 Left = 0 -
trunk/Forms/FormMain.pas
r153 r154 63 63 const 64 64 UnixLanguagesDir = '../share/TransLines'; 65 var 66 NewDir: string; 67 {$ENDIF} 68 const 65 69 LanguagesDirName = 'Languages'; 66 70 var 67 NewDir: string;68 71 BaseDir: string; 69 {$ENDIF}70 72 begin 71 73 BaseDir := ExcludeTrailingPathDelimiter(ExtractFilePath(ParamStr(0))); -
trunk/Install/flatpak/net.zdechov.app.TransLines.yml
r152 r154 28 28 - type: svn 29 29 url: https://svn.zdechov.net/translines/trunk 30 revision: r15 230 revision: r154 31 31 buildsystem: simple 32 32 build-commands: -
trunk/Packages/Common/Translator.pas
r145 r154 322 322 Result[I] := StringReplace(Result[I], '/', DirectorySeparator, [rfReplaceAll]); 323 323 Result[I] := StringReplace(Result[I], '\', DirectorySeparator, [rfReplaceAll]); 324 if Copy(Result[I], 1, 1) <> DirectorySeparatorthen324 if (Copy(Result[I], 1, 1) <> DirectorySeparator) and (Copy(Result[I], 2, 2) <> ':\') then 325 325 Result[I] := ExtractFileDir(Application.ExeName) + 326 326 DirectorySeparator + Result[I];
Note:
See TracChangeset
for help on using the changeset viewer.