Возвращает значение элемента с индексом Index в типе Real: вначале проверяет поле ItemS, которое должно иметь значение SizeOf(Real), затем вызывает Getltem и преобразует полученное значение элемента Index к типу Real.

Singleltem Function Singleltem (Index: Longint) : Single;

Возвращает значение элемента с индексом Index в типе Single: вначале проверяет поле ItemS, которое должно иметь значение SizeOf(Single), затем вызывает Getltem и преобразует полученное значение элемента Index к типу Single.

TEMSMatrix________________________________________

"Объект содержит средства для работы с двумерными массивами в EMS— памяти. Он перекрывает методы своего родителя TEMSVector для обеспечения доступа к элементам массива по двум индексам. Для этого в объект включен метод GetVedndex, с помощью которого два индекса преобразуются к одному индексу массива TEMSVector с нулевой левой границей. Пересчет осуществляется по стандартному правилу Паскаля:

элементы двумерного массива располагаются в памяти таким образом, что при переходе от одного элемента к соседнему наиболее быстро изменяется второй индекс.

Поля

Minlndl Minlndl: Longint Только чтение

Содержит левую границу первого измерения.

Maxindl Maxindl: Longint Только чтение

Содержит правую границу первого измерения.

Minlnd2 MinInd2: Longint Только чтение

Содержит левую границу второго измерения.

Maxlnd2 Maxlnd2 : Longint Только чтение

Содержит правую границу второго измерения.

Методы

Init Constructor Init (ASize, Mini, Maxi, Min2, Max2:

Longint);

Создает объект TEMSMatrix: по границам измерений Mini...Max2 определяет общее количество Sz элементов, вызывает родительский метод TEMSVector.Init с границами 0, Sz—1 и помещает границы Mini...Max2 в поля Minlndl...Maxlnd2.

Load Constructor Load (var F: File);

Перекрывается: Иногда

Считывает все поля и данные объекта TEMSMatrix из файла F: вначале вызывает родительский метод TEMSVector.Laad, затем читает из <^<ssxa. заголовок RegHeadTEMSMatrix (см. п.8.3.2) и поля Mi'rtJndI, MoxJndl, Minlnd2, Maxlnd2. Перед обращением к методу файловую переменную F необходимо связать с уже существующим нетипизированным файлом, а сам файл должен быть открыт для чтения блоками длиной в 1 байт.