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

LightPT - File.ReadBytes

Browse source
This commit is contained in:
Mikhalkovich Stanislav 2022-09-24 23:34:26 +03:00
parent cca6643a9a
commit 6096112e55
5 changed files with 5 additions and 7 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 = "3175";
public const string Revision = "3177";
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%=3175
%REVISION%=3177
%COREVERSION%=3
%MAJOR%=3

2
Release/pabcversion.txt
View file

@ -1 +1 @@
3.8.3.3175
3.8.3.3177

2
ReleaseGenerators/PascalABCNET_version.nsh
View file

@ -1 +1 @@
!define VERSION '3.8.3.3175'
!define VERSION '3.8.3.3177'

4
bin/Lib/LightPT.pas
View file

@ -1477,9 +1477,7 @@ end;
procedure WriteInfoToRemoteDatabase(auth: string; LessonName, TaskName, TaskPlatform, TaskResult, AdditionalInfo: string);
begin
// Считать логин пароль из auth
var f: file of byte;
Reset(f,auth);
var data := f.Elements.ToArray;
var data := System.IO.File.ReadAllBytes(auth);
var arr := Decrypt(data).Split(#10);
var login,pass: string;
if arr.Length >= 2 then