UseDllForSystemUnit - включать безусловно если флажок включен

school.pct значительно улучшен
This commit is contained in:
Mikhalkovich Stanislav 2020-02-09 14:53:40 +03:00
parent 536e62e369
commit a9d9bdc345
6 changed files with 40 additions and 23 deletions

View file

@ -15,7 +15,7 @@ internal static class RevisionClass
public const string Major = "3"; public const string Major = "3";
public const string Minor = "6"; public const string Minor = "6";
public const string Build = "0"; public const string Build = "0";
public const string Revision = "2344"; public const string Revision = "2345";
public const string MainVersion = Major + "." + Minor; public const string MainVersion = Major + "." + Minor;
public const string FullVersion = Major + "." + Minor + "." + Build + "." + Revision; public const string FullVersion = Major + "." + Minor + "." + Build + "." + Revision;

View file

@ -1,4 +1,4 @@
%COREVERSION%=0
%REVISION%=2344
%MINOR%=6 %MINOR%=6
%REVISION%=2345
%COREVERSION%=0
%MAJOR%=3 %MAJOR%=3

View file

@ -1 +1 @@
3.6.0.2344 3.6.0.2345

View file

@ -1 +1 @@
!define VERSION '3.6.0.2344' !define VERSION '3.6.0.2345'

View file

@ -93,7 +93,8 @@ namespace VisualPascalABC
Workbench.UserOptions.UseDllForSystemUnits = false; Workbench.UserOptions.UseDllForSystemUnits = false;
Workbench.UserOptions.PABCDllChecked = true; Workbench.UserOptions.PABCDllChecked = true;
} }
if (Workbench.UserOptions.DeleteEXEAfterExecute && Workbench.UserOptions.UseDllForSystemUnits && !startWithGoto && !needFirstBreakpoint) // SSM 09.02.20 - UseDllForSystemUnits включать когда флаг установлен - безо всяких доп. условий
if (/*Workbench.UserOptions.DeleteEXEAfterExecute &&*/ Workbench.UserOptions.UseDllForSystemUnits && !startWithGoto && !needFirstBreakpoint)
BuildService.CompilerOptions.UseDllForSystemUnits = true; BuildService.CompilerOptions.UseDllForSystemUnits = true;
} }
else else

View file

@ -5,17 +5,23 @@ end.
[var •: тип/Основное/Описание переменной с типом] [var •: тип/Основное/Описание переменной с типом]
var |: тип; var |: тип;
[Print/Операторы/Оператор вывода] [var • := значение/Основное/Описание переменной с присваиванием значения]
var | := •;
[var (•,•) := (зн1,зн2)/Основное/Описание двух переменных с присваиванием значений]
var (|,•) := (•,•);
[Print/Ввод-вывод/Оператор вывода]
Print(|); Print(|);
[Println/Операторы/Оператор вывода с переходом на новую строку] [Println/Ввод-вывод/Оператор вывода с переходом на новую строку]
Println(|); Println(|);
[ReadInteger/Операторы/Описание целой переменной со вводом] [ReadInteger/Ввод-вывод/Описание целой переменной со вводом]
var | := ReadInteger; var | := ReadInteger;
[ReadReal/Операторы/Описание вещественной переменной со вводом] [ReadReal/Ввод-вывод/Описание вещественной переменной со вводом]
var | := ReadReal; var | := ReadReal;
[begin … end/Операторы/Составной оператор. Используется для превращения группы операторов в один. begin и end называют операторными скобками] [begin … end/Операторы/Составной оператор. Используется для превращения группы операторов в один. begin и end называют операторными скобками]
@ -23,42 +29,52 @@ begin
| |
end; end;
[loop • do …/Управляющие операторы/Оператор цикла с известным числом повторений] [loop • do …/Операторы/Оператор цикла с известным числом повторений]
loop 10 do loop 10 do
| |
[loop • do b … e/Управляющие операторы/Оператор цикла с известным числом повторений] [loop • do b … e/Операторы/Оператор цикла с известным числом повторений и с телом в виде составного оператора]
loop 10 do loop 10 do
begin begin
| |
end; end;
[for var i:=• to • do …/Управляющие операторы/Оператор цикла со счётчиком] [for var i:=• to • do …/Операторы/Оператор цикла со счётчиком]
for var i:=1 to 10 do for var i:=1 to 10 do
| |
[for var i:=• to • do b … e/Управляющие операторы/Оператор цикла со счётчиком] [for var i:=• to • do b … e/Операторы/Оператор цикла со счётчиком и с телом в виде составного оператора]
for var i:=1 to 10 do for var i:=1 to 10 do
begin begin
| |
end; end;
[if • then …/Управляющие операторы/Условный оператор - неполная форма] [foreach var x in • do …/Операторы/Оператор цикла foreach]
foreach var x in • do
|
[foreach var x in • do b … e/Операторы/Оператор цикла foreach с телом в виде составного оператора]
foreach var x in • do
begin
|
end;
[if • then …/Операторы/Условный оператор - неполная форма]
if условие then if условие then
| |
[if • then b … e/Управляющие операторы/Условный оператор - неполная форма] [if • then b … e/Операторы/Условный оператор - неполная форма - с составным оператором по ветви then]
if условие then if условие then
begin begin
| |
end; end;
[if • then … else …/Управляющие операторы/Условный оператор - полная форма] [if • then … else …/Операторы/Условный оператор - полная форма]
if условие then if условие then
| |
else else
[if • then b … e else b … e/Управляющие операторы/Условный оператор - полная форма] [if • then b … e else b … e/Операторы/Условный оператор - полная форма - с составным оператором по ветвям then и else]
if условие then if условие then
begin begin
| |
@ -68,22 +84,22 @@ begin
end; end;
[while • do …/Управляющие операторы/Оператор цикла с предварительным условием] [while • do …/Операторы/Оператор цикла с предварительным условием]
while условие do while условие do
| |
[while • do b … e/Управляющие операторы/Оператор цикла с предварительным условием] [while • do b … e/Операторы/Оператор цикла с предварительным условием]
while условие do while условие do
begin begin
| |
end; end;
[repeat … until •/Управляющие операторы/Оператор цикла с последующим условием] [repeat … until •/Операторы/Оператор цикла с последующим условием]
repeat repeat
| |
until условие; until условие;
[case • of … end/Управляющие операторы/Оператор выбора варианта] [case • of … end/Операторы/Оператор выбора варианта]
case | of case | of
• : …; • : …;
end; end;