Релиз2_6_0_0

ahyahy · Jan 4, 2024 · 360799b · 360799b
1 parent e0dec8b
commit 360799b
Show file tree

Hide file tree

Showing 10 changed files with 394 additions and 12 deletions.
diff --git a/OneScriptForms/OneScriptForms/DataGridViewRowHeadersWidthSizeMode.cs b/OneScriptForms/OneScriptForms/DataGridViewRowHeadersWidthSizeMode.cs
@@ -1,16 +1,54 @@
 using ScriptEngine.Machine.Contexts;
+using ScriptEngine.Machine;
+using System.Collections;
+using System.Collections.Generic;
 
 namespace osf
 {
     [ContextClass ("КлРежимШириныЗаголовковСтрок", "ClDataGridViewRowHeadersWidthSizeMode")]
-    public class ClDataGridViewRowHeadersWidthSizeMode : AutoContext<ClDataGridViewRowHeadersWidthSizeMode>
+    public class ClDataGridViewRowHeadersWidthSizeMode : AutoContext<ClDataGridViewRowHeadersWidthSizeMode>, ICollectionContext, IEnumerable<IValue>
     {
-        private int m_enableResizing = (int)System.Windows.Forms.DataGridViewRowHeadersWidthSizeMode.EnableResizing; // 0 Пользователи могут изменять ширину заголовка столбца с помощью мыши.
-        private int m_disableResizing = (int)System.Windows.Forms.DataGridViewRowHeadersWidthSizeMode.DisableResizing; // 1 Пользователи не могут изменять ширину заголовка столбца с помощью мыши.
+        private int m_enableResizing = (int)System.Windows.Forms.DataGridViewRowHeadersWidthSizeMode.EnableResizing; // 0 Пользователи могут изменять ширину заголовка колонки с помощью мыши.
+        private int m_disableResizing = (int)System.Windows.Forms.DataGridViewRowHeadersWidthSizeMode.DisableResizing; // 1 Пользователи не могут изменять ширину заголовка колонки с помощью мыши.
         private int m_autoSizeToAllHeaders = (int)System.Windows.Forms.DataGridViewRowHeadersWidthSizeMode.AutoSizeToAllHeaders; // 2 Ширина заголовка строки изменяется, чтобы вместить содержимое всех ячеек заголовка строки.
         private int m_autoSizeToDisplayedHeaders = (int)System.Windows.Forms.DataGridViewRowHeadersWidthSizeMode.AutoSizeToDisplayedHeaders; // 3 Ширина заголовка строки изменяется, чтобы вместить содержимое всех отображенных ячеек заголовка строки.
         private int m_autoSizeToFirstHeader = (int)System.Windows.Forms.DataGridViewRowHeadersWidthSizeMode.AutoSizeToFirstHeader; // 4 Ширина заголовка строки изменяется, чтобы вместить содержимое первого заголовка строки.
 
+        private List<IValue> _list;
+
+        public int Count()
+        {
+            return _list.Count;
+        }
+
+        public CollectionEnumerator GetManagedIterator()
+        {
+            return new CollectionEnumerator(this);
+        }
+
+        IEnumerator IEnumerable.GetEnumerator()
+        {
+            return ((IEnumerable<IValue>)_list).GetEnumerator();
+        }
+
+        IEnumerator<IValue> IEnumerable<IValue>.GetEnumerator()
+        {
+            foreach (var item in _list)
+            {
+                yield return (item as IValue);
+            }
+        }
+
+        internal ClDataGridViewRowHeadersWidthSizeMode()
+        {
+            _list = new List<IValue>();
+            _list.Add(ValueFactory.Create(AutoSizeToAllHeaders));
+            _list.Add(ValueFactory.Create(AutoSizeToDisplayedHeaders));
+            _list.Add(ValueFactory.Create(AutoSizeToFirstHeader));
+            _list.Add(ValueFactory.Create(DisableResizing));
+            _list.Add(ValueFactory.Create(EnableResizing));
+        }
+
         [ContextProperty("Включить", "EnableResizing")]
         public int EnableResizing
         {

diff --git a/OneScriptForms/OneScriptForms/DataGridViewSelectionMode.cs b/OneScriptForms/OneScriptForms/DataGridViewSelectionMode.cs
@@ -1,16 +1,54 @@
 using ScriptEngine.Machine.Contexts;
+using ScriptEngine.Machine;
+using System.Collections;
+using System.Collections.Generic;
 
 namespace osf
 {
     [ContextClass ("КлРежимВыбораТаблицы", "ClDataGridViewSelectionMode")]
-    public class ClDataGridViewSelectionMode : AutoContext<ClDataGridViewSelectionMode>
+    public class ClDataGridViewSelectionMode : AutoContext<ClDataGridViewSelectionMode>, ICollectionContext, IEnumerable<IValue>
     {
         private int m_cellSelect = (int)System.Windows.Forms.DataGridViewSelectionMode.CellSelect; // 0 Можно выбрать одну или несколько отдельных ячеек.
         private int m_fullRowSelect = (int)System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect; // 1 Вся строка может быть выбрана путем щелчка заголовка строки или ячейки, содержащейся в этой строке.
         private int m_fullColumnSelect = (int)System.Windows.Forms.DataGridViewSelectionMode.FullColumnSelect; // 2 Вся колонка может быть выбрана путем щелчка заголовка колонки или ячейки, содержащейся в этой колонке.
         private int m_rowHeaderSelect = (int)System.Windows.Forms.DataGridViewSelectionMode.RowHeaderSelect; // 3 Строка может быть выбрана путем щелчка заголовка строки. Отдельную ячейку можно выбрать, щелкнув ее.
         private int m_columnHeaderSelect = (int)System.Windows.Forms.DataGridViewSelectionMode.ColumnHeaderSelect; // 4 Колонка будет выбрана путем щелчка ячейки заголовка колонки. Отдельную ячейку можно выбрать, щелкнув ее.
 
+        private List<IValue> _list;
+
+        public int Count()
+        {
+            return _list.Count;
+        }
+
+        public CollectionEnumerator GetManagedIterator()
+        {
+            return new CollectionEnumerator(this);
+        }
+
+        IEnumerator IEnumerable.GetEnumerator()
+        {
+            return ((IEnumerable<IValue>)_list).GetEnumerator();
+        }
+
+        IEnumerator<IValue> IEnumerable<IValue>.GetEnumerator()
+        {
+            foreach (var item in _list)
+            {
+                yield return (item as IValue);
+            }
+        }
+
+        internal ClDataGridViewSelectionMode()
+        {
+            _list = new List<IValue>();
+            _list.Add(ValueFactory.Create(CellSelect));
+            _list.Add(ValueFactory.Create(ColumnHeaderSelect));
+            _list.Add(ValueFactory.Create(FullColumnSelect));
+            _list.Add(ValueFactory.Create(FullRowSelect));
+            _list.Add(ValueFactory.Create(RowHeaderSelect));
+        }
+
         [ContextProperty("ЗаголовокКолонки", "ColumnHeaderSelect")]
         public int ColumnHeaderSelect
         {

diff --git a/OneScriptForms/OneScriptForms/DataGridViewTriState.cs b/OneScriptForms/OneScriptForms/DataGridViewTriState.cs
@@ -1,14 +1,50 @@
 using ScriptEngine.Machine.Contexts;
+using ScriptEngine.Machine;
+using System.Collections;
+using System.Collections.Generic;
 
 namespace osf
 {
     [ContextClass ("КлТриСостояния", "ClDataGridViewTriState")]
-    public class ClDataGridViewTriState : AutoContext<ClDataGridViewTriState>
+    public class ClDataGridViewTriState : AutoContext<ClDataGridViewTriState>, ICollectionContext, IEnumerable<IValue>
     {
         private int m_notSet = (int)System.Windows.Forms.DataGridViewTriState.NotSet; // 0 Это свойство не задано и будет функционировать по другому.
         private int m_true = (int)System.Windows.Forms.DataGridViewTriState.True; // 1 Состояние свойства - <B>Истина</B>.
         private int m_false = (int)System.Windows.Forms.DataGridViewTriState.False; // 2 Состояние свойства - <B>Ложь</B>.
 
+        private List<IValue> _list;
+
+        public int Count()
+        {
+            return _list.Count;
+        }
+
+        public CollectionEnumerator GetManagedIterator()
+        {
+            return new CollectionEnumerator(this);
+        }
+
+        IEnumerator IEnumerable.GetEnumerator()
+        {
+            return ((IEnumerable<IValue>)_list).GetEnumerator();
+        }
+
+        IEnumerator<IValue> IEnumerable<IValue>.GetEnumerator()
+        {
+            foreach (var item in _list)
+            {
+                yield return (item as IValue);
+            }
+        }
+
+        internal ClDataGridViewTriState()
+        {
+            _list = new List<IValue>();
+            _list.Add(ValueFactory.Create(False));
+            _list.Add(ValueFactory.Create(NotSet));
+            _list.Add(ValueFactory.Create(True));
+        }
+
         [ContextProperty("Истина", "True")]
         public int True
         {

diff --git a/OneScriptForms/OneScriptForms/DataRowState.cs b/OneScriptForms/OneScriptForms/DataRowState.cs
@@ -1,16 +1,54 @@
 using ScriptEngine.Machine.Contexts;
+using ScriptEngine.Machine;
+using System.Collections;
+using System.Collections.Generic;
 
 namespace osf
 {
     [ContextClass ("КлСостояниеСтрокиДанных", "ClDataRowState")]
-    public class ClDataRowState : AutoContext<ClDataRowState>
+    public class ClDataRowState : AutoContext<ClDataRowState>, ICollectionContext, IEnumerable<IValue>
     {
         private int m_detached = (int)System.Data.DataRowState.Detached; // 1 Строка была создана, но не является частью какой-либо коллекции данных. Поток данных находится в этом состоянии сразу после его создания и до его добавления в коллекцию или после его удаления из коллекции.
         private int m_unchanged = (int)System.Data.DataRowState.Unchanged; // 2 Строка не изменилась с момента последнего вызова функции <A href="OneScriptForms.DataRow.AcceptChanges.html">СтрокаДанных.ПринятьИзменения&nbsp;(DataRow.AcceptChanges)</A>.
         private int m_added = (int)System.Data.DataRowState.Added; // 4 Строка была добавлена в коллекцию <A href="OneScriptForms.DataRowCollection.html">СтрокиДанных&nbsp;(DataRowCollection)</A>, а функция <A href="OneScriptForms.DataRow.AcceptChanges.html">СтрокаДанных.ПринятьИзменения&nbsp;(DataRow.AcceptChanges)</A> не была вызвана.
         private int m_deleted = (int)System.Data.DataRowState.Deleted; // 8 Строка была удалена с помощью метода <A href="OneScriptForms.DataRow.Delete.html">СтрокаДанных.Удалить&nbsp;(DataRow.Delete)</A>.
         private int m_modified = (int)System.Data.DataRowState.Modified; // 16 Строка была изменена, и функция <A href="OneScriptForms.DataRow.AcceptChanges.html">СтрокаДанных.ПринятьИзменения&nbsp;(DataRow.AcceptChanges)</A> не была вызвана.
 
+        private List<IValue> _list;
+
+        public int Count()
+        {
+            return _list.Count;
+        }
+
+        public CollectionEnumerator GetManagedIterator()
+        {
+            return new CollectionEnumerator(this);
+        }
+
+        IEnumerator IEnumerable.GetEnumerator()
+        {
+            return ((IEnumerable<IValue>)_list).GetEnumerator();
+        }
+
+        IEnumerator<IValue> IEnumerable<IValue>.GetEnumerator()
+        {
+            foreach (var item in _list)
+            {
+                yield return (item as IValue);
+            }
+        }
+
+        internal ClDataRowState()
+        {
+            _list = new List<IValue>();
+            _list.Add(ValueFactory.Create(Added));
+            _list.Add(ValueFactory.Create(Deleted));
+            _list.Add(ValueFactory.Create(Detached));
+            _list.Add(ValueFactory.Create(Modified));
+            _list.Add(ValueFactory.Create(Unchanged));
+        }
+
         [ContextProperty("Добавлена", "Added")]
         public int Added
         {

diff --git a/OneScriptForms/OneScriptForms/DataType.cs b/OneScriptForms/OneScriptForms/DataType.cs
@@ -1,16 +1,54 @@
 using ScriptEngine.Machine.Contexts;
+using ScriptEngine.Machine;
+using System.Collections;
+using System.Collections.Generic;
 
 namespace osf
 {
     [ContextClass ("КлТипДанных", "ClDataType")]
-    public class ClDataType : AutoContext<ClDataType>
+    public class ClDataType : AutoContext<ClDataType>, ICollectionContext, IEnumerable<IValue>
     {
         private int m_string = 0; // 0 Тип данных <B>Строка</B>.
         private int m_number = 1; // 1 Тип данных <B>Число</B>.
         private int m_boolean = 2; // 2 Тип данных <B>Булево</B>.
         private int m_date = 3; // 3 Тип данных <B>Дата</B>.
         private int m_object = 4; // 4 Тип данных <B>Объект</B>.
 
+        private List<IValue> _list;
+
+        public int Count()
+        {
+            return _list.Count;
+        }
+
+        public CollectionEnumerator GetManagedIterator()
+        {
+            return new CollectionEnumerator(this);
+        }
+
+        IEnumerator IEnumerable.GetEnumerator()
+        {
+            return ((IEnumerable<IValue>)_list).GetEnumerator();
+        }
+
+        IEnumerator<IValue> IEnumerable<IValue>.GetEnumerator()
+        {
+            foreach (var item in _list)
+            {
+                yield return (item as IValue);
+            }
+        }
+
+        internal ClDataType()
+        {
+            _list = new List<IValue>();
+            _list.Add(ValueFactory.Create(Boolean));
+            _list.Add(ValueFactory.Create(Date));
+            _list.Add(ValueFactory.Create(Number));
+            _list.Add(ValueFactory.Create(Object));
+            _list.Add(ValueFactory.Create(String));
+        }
+
         [ContextProperty("Булево", "Boolean")]
         public int Boolean
         {

diff --git a/OneScriptForms/OneScriptForms/Day.cs b/OneScriptForms/OneScriptForms/Day.cs
@@ -1,9 +1,12 @@
 using ScriptEngine.Machine.Contexts;
+using ScriptEngine.Machine;
+using System.Collections;
+using System.Collections.Generic;
 
 namespace osf
 {
     [ContextClass ("КлДень", "ClDay")]
-    public class ClDay : AutoContext<ClDay>
+    public class ClDay : AutoContext<ClDay>, ICollectionContext, IEnumerable<IValue>
     {
         private int m_monday = (int)System.Windows.Forms.Day.Monday; // 0 День: понедельник.
         private int m_tuesday = (int)System.Windows.Forms.Day.Tuesday; // 1 День: вторник.
@@ -14,6 +17,44 @@ public class ClDay : AutoContext<ClDay>
         private int m_sunday = (int)System.Windows.Forms.Day.Sunday; // 6 День: воскресенье.
         private int m_default = (int)System.Windows.Forms.Day.Default; // 7 День недели, используемый по умолчанию, определенный приложением.
 
+        private List<IValue> _list;
+
+        public int Count()
+        {
+            return _list.Count;
+        }
+
+        public CollectionEnumerator GetManagedIterator()
+        {
+            return new CollectionEnumerator(this);
+        }
+
+        IEnumerator IEnumerable.GetEnumerator()
+        {
+            return ((IEnumerable<IValue>)_list).GetEnumerator();
+        }
+
+        IEnumerator<IValue> IEnumerable<IValue>.GetEnumerator()
+        {
+            foreach (var item in _list)
+            {
+                yield return (item as IValue);
+            }
+        }
+
+        internal ClDay()
+        {
+            _list = new List<IValue>();
+            _list.Add(ValueFactory.Create(Default));
+            _list.Add(ValueFactory.Create(Friday));
+            _list.Add(ValueFactory.Create(Monday));
+            _list.Add(ValueFactory.Create(Saturday));
+            _list.Add(ValueFactory.Create(Sunday));
+            _list.Add(ValueFactory.Create(Thursday));
+            _list.Add(ValueFactory.Create(Tuesday));
+            _list.Add(ValueFactory.Create(Wednesday));
+        }
+
         [ContextProperty("Воскресенье", "Sunday")]
         public int Sunday
         {

diff --git a/OneScriptForms/OneScriptForms/DialogResult.cs b/OneScriptForms/OneScriptForms/DialogResult.cs
@@ -1,9 +1,12 @@
 using ScriptEngine.Machine.Contexts;
+using ScriptEngine.Machine;
+using System.Collections;
+using System.Collections.Generic;
 
 namespace osf
 {
     [ContextClass ("КлРезультатДиалога", "ClDialogResult")]
-    public class ClDialogResult : AutoContext<ClDialogResult>
+    public class ClDialogResult : AutoContext<ClDialogResult>, ICollectionContext, IEnumerable<IValue>
     {
         private int m_none = (int)System.Windows.Forms.DialogResult.None; // 0 Диалоговое окно возвращает значение <B>Ничего</B>. Это означает, что модальное диалоговое окно не закрывается.
         private int m_oK = (int)System.Windows.Forms.DialogResult.OK; // 1 Диалоговое окно возвращает значение <B>ОК</B>.
@@ -14,6 +17,44 @@ public class ClDialogResult : AutoContext<ClDialogResult>
         private int m_yes = (int)System.Windows.Forms.DialogResult.Yes; // 6 Диалоговое окно возвращает значение <B>Да</B>.
         private int m_no = (int)System.Windows.Forms.DialogResult.No; // 7 Диалоговое окно возвращает значение <B>Нет</B>.
 
+        private List<IValue> _list;
+
+        public int Count()
+        {
+            return _list.Count;
+        }
+
+        public CollectionEnumerator GetManagedIterator()
+        {
+            return new CollectionEnumerator(this);
+        }
+
+        IEnumerator IEnumerable.GetEnumerator()
+        {
+            return ((IEnumerable<IValue>)_list).GetEnumerator();
+        }
+
+        IEnumerator<IValue> IEnumerable<IValue>.GetEnumerator()
+        {
+            foreach (var item in _list)
+            {
+                yield return (item as IValue);
+            }
+        }
+
+        internal ClDialogResult()
+        {
+            _list = new List<IValue>();
+            _list.Add(ValueFactory.Create(Abort));
+            _list.Add(ValueFactory.Create(Cancel));
+            _list.Add(ValueFactory.Create(Ignore));
+            _list.Add(ValueFactory.Create(No));
+            _list.Add(ValueFactory.Create(None));
+            _list.Add(ValueFactory.Create(OK));
+            _list.Add(ValueFactory.Create(Retry));
+            _list.Add(ValueFactory.Create(Yes));
+        }
+
         [ContextProperty("Да", "Yes")]
         public int Yes
         {