administrator/pascalabcnet
1
0
Fork 0
Code Issues Pull requests Actions Packages Projects Releases Wiki Activity

#2810

Browse source
This commit is contained in:
Ivan Bondarev 2023-03-19 11:55:10 +01:00
parent bb1a361e1a
commit d868eef9e6
7 changed files with 15 additions and 19 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
Configuration/GlobalAssemblyInfo.cs
View file

@ -15,7 +15,7 @@ internal static class RevisionClass
public const string Major = "3";
public const string Minor = "8";
public const string Build = "3";
public const string Revision = "3251";
public const string Revision = "3253";
public const string MainVersion = Major + "." + Minor;
public const string FullVersion = Major + "." + Minor + "." + Build + "." + Revision;

2
Configuration/Version.defs
View file

@ -1,4 +1,4 @@
%MINOR%=8
%REVISION%=3251
%REVISION%=3253
%COREVERSION%=3
%MAJOR%=3

BIN
Localization/DefaultLang.resources
View file

Binary file not shown.

2
Release/pabcversion.txt
View file

@ -1 +1 @@
3.8.3.3251
3.8.3.3253

2
ReleaseGenerators/PascalABCNET_version.nsh
View file

@ -1 +1 @@
!define VERSION '3.8.3.3251'
!define VERSION '3.8.3.3253'

BIN
Utils/DefaultLanguageResMaker/LanguageResMaker.exe
View file

Binary file not shown.

26
Utils/DefaultLanguageResMaker/LanguageResMaker.pas
View file

@ -1,23 +1,19 @@
// Copyright (c) Ivan Bondarev, Stanislav Mikhalkovich (for details please see \doc\copyright.txt)
// Copyright (c) Ivan Bondarev, Stanislav Mikhalkovich (for details please see \doc\copyright.txt)
// This code is distributed under the GNU LGPL (for details please see \doc\license.txt)
uses FilesOperations,
System.IO,
System.Resources;
uses
FilesOperations,
System.IO,
System.Resources;
var Files:array of FileInfo;
i:integer;
res:string;
ResWriter:ResourceWriter;
begin
Files:=DirectoryInfo.Create('..\..\bin\lng\rus').GetFiles('*.*');
Writeln('Найдено '+Files.Length.tostring+' файлов, обработка...');
res:='';
for i:=0 to Files.Length-1 do
res:=res+#13#10#13#10'//'+Files[i].Name+#13#10'%PREFIX%='#13#10+
var Files := DirectoryInfo.Create(Path.Combine('..', '..', 'bin', 'Lng', 'rus')).GetFiles('*.*');
Writeln('Найдено ' + Files.Length.tostring + ' файлов, обработка...');
var res := '';
for var i := 0 to Files.Length - 1 do
res := res + #13#10#13#10'//' + Files[i].Name + #13#10'%PREFIX%='#13#10 +
ReadFileToEnd(Files[i].FullName);
Writeln('Сохранение собраного файла в ресурс...');
ResWriter:=ResourceWriter.Create('..\..\Localization\DefaultLang.resources');
var ResWriter := ResourceWriter.Create(Path.Combine('..', '..', 'Localization', 'DefaultLang.resources'));
ResWriter.AddResource('DefaultLanguage', System.Text.Encoding.GetEncoding(1251).GetBytes(res));
ResWriter.Generate;
ResWriter.Close;