Исправлена ошибка с окном About в Линукс-версии
В Модуле Исполнители написана директива {$savepcu false}
This commit is contained in:
parent
d6dce4769e
commit
9b673bba2f
|
|
@ -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 = "3204";
|
||||
public const string Revision = "3205";
|
||||
|
||||
public const string MainVersion = Major + "." + Minor;
|
||||
public const string FullVersion = Major + "." + Minor + "." + Build + "." + Revision;
|
||||
|
|
|
|||
|
|
@ -1,4 +1,4 @@
|
|||
%COREVERSION%=3
|
||||
%REVISION%=3204
|
||||
%MINOR%=8
|
||||
%REVISION%=3205
|
||||
%COREVERSION%=3
|
||||
%MAJOR%=3
|
||||
|
|
|
|||
|
|
@ -2,6 +2,8 @@
|
|||
/// Описывает ряд Исполнителей, которые могут выполнять команды
|
||||
unit Исполнители;
|
||||
|
||||
{$savepcu false}
|
||||
|
||||
type
|
||||
///!#
|
||||
целое = integer;
|
||||
|
|
|
|||
|
|
@ -1 +1 @@
|
|||
3.8.3.3204
|
||||
3.8.3.3205
|
||||
|
|
|
|||
|
|
@ -1 +1 @@
|
|||
!define VERSION '3.8.3.3204'
|
||||
!define VERSION '3.8.3.3205'
|
||||
|
|
|
|||
|
|
@ -119,7 +119,8 @@ namespace VisualPascalABC
|
|||
|
||||
private void AboutBox_Shown(object sender, EventArgs e)
|
||||
{
|
||||
|
||||
try
|
||||
{
|
||||
lVersion.Text = string.Format("{0}, сборка {1} ({2})", PascalABCCompiler.Compiler.ShortVersion, RevisionClass.Revision, PascalABCCompiler.Compiler.VersionDateTime.ToShortDateString());
|
||||
dgvModules.Items.Clear();
|
||||
|
||||
|
|
@ -140,10 +141,15 @@ namespace VisualPascalABC
|
|||
|
||||
}
|
||||
|
||||
dgvModules.Items.Add(MakeItem(Assembly.LoadFile(Path.Combine(apppatch,"ICSharpCode.TextEditor.dll"))));
|
||||
dgvModules.Items.Add(MakeItem(Assembly.LoadFile(Path.Combine(apppatch,"Debugger.Core.dll"))));
|
||||
dgvModules.Items.Add(MakeItem(Assembly.LoadFile(Path.Combine(apppatch,"WeifenLuo.WinFormsUI.Docking.dll"))));
|
||||
//dgvModules.Items.Add(MakeItem(Assembly.LoadFile(Path.Combine(apppatch,"ICSharpCode.TextEditor.dll"))));
|
||||
//dgvModules.Items.Add(MakeItem(Assembly.LoadFile(Path.Combine(apppatch,"Debugger.Core.dll"))));
|
||||
//dgvModules.Items.Add(MakeItem(Assembly.LoadFile(Path.Combine(apppatch,"WeifenLuo.WinFormsUI.Docking.dll"))));
|
||||
ActiveControl = button1;
|
||||
}
|
||||
catch
|
||||
{
|
||||
|
||||
}
|
||||
/*lbComponents.Items.Clear();
|
||||
PascalABCCompiler.Compiler comp = (Owner as Form1).VisualEnvironmentCompiler.Compiler;
|
||||
if (comp != null)
|
||||
|
|
|
|||
Loading…
Reference in a new issue