.. currentmodule:: TatInternalObject

Pascal библиотеки
======================================================================

.. pas:class:: THandle

  Числовое значение, идентифицирующее некоторую сущность/объект. Служит для развязки реализации объекта с логикой его использующей.
  Не даёт представления о структуре объекта, но позволяет с ним работать.

  .. warning:: Не поддерживается в :term:`Application Server`

.. pas:function:: GetObjectPointer(object: TatInternalObject): Integer

  Метод возвращает идентификатор-указатель скриптового объекта, дает
  возможность сравнивать объекты.

  На данный момент предусмотрен вызов метода только для объектов
  следующих типов:

  - TbtkScriptSelectionObject, т.е. выборок.
  - TbtkScriptFormObject, т.е. форм.

  При возникновении необходимости функциональность будет расширена.

  :param TatInternalObject object:
    Объект.

  :rtype: Integer

  .. code-block:: delphi
    :caption: Пример использования

    <PASCAL>
      // получение идентификатора выборки
      idFocusedSel := GetObjectPointer(Selection.FindFocusedSelection);
      ShowMessage(VarToStr(idFocusedSel));
      // получение идентификатора формы
      idFormObject := GetObjectPointer(Application.FindFormBySelection(Selection.EntityName));
      ShowMessage(VarToStr(idFormObject));
    </PASCAL>

  .. warning:: Не поддерживается в :term:`Application Server`


.. pas:function:: LastUserResult(): Integer

  Функция возращает последний результат закрытия модального окна.

  :rtype: Integer


.. pas:function:: CheckPascalOperationSyntax(PascalText: String): Boolean

  Метод проверяет синтаксис паскаль скрипта *PascalText*.

  :param String PascalText:
    Текст паскаль скрипта.

  :rtype: Boolean


.. pas:function:: CreateArgs(NameValues: Array): TbtkNamedArgs

  Создаёт коллекцию аргументов.
  Метод перегружен и имеет 3 формы вызова.

  :param Array NameValues:
    Чередующийся массив имён и значений аргументов имеющий следующий вид:
    [Имя, Значение, Имя, Значение]

  :rtype: TbtkNamedArgs

  .. code-block:: delphi
    :caption: Пример использования

    <Pascal>
      args0 := CreateArgs();
      args1 := CreateArgs(['A', 100, 'B', 200]);
      args2 := CreateArgs(['A', 'B'], [100,200]);
    </Pascal>


.. toctree::
  :maxdepth: 1

  Strings.rst