Справочная система

• Введение
• Установка MatriX
• Структура ядра
• Программирование внешних функций
• Доступ к элементам массива
• Интерфейсная часть ядра
• Функции ядра MatriX

Функции ядра MatriX

• function GetRowAddress(const Name: string; RowNum: Integer = 1): Pointer; overload;
• function GetRowAddress(Idx: Integer; RowNum: Integer = 1): Pointer; overload;

Возвращает адрес начала строки RowNum массива, заданного именем или индексом. Данная функция обеспечивает самый быстрый способ выполнения построчной обработки массива. Для этого вам нужно объявить массив, имеющий тип PRealArray (смотрите пример).

procedure TForm1.Button1Click(Sender: TObject);
var
  RArray: PRealArray;
  I, J, Rows, Cols, Idx: Integer;
begin
  with Base do
  begin
    // Создаем массив случ. чисел 5 х 10
    RandomAr('A', 5, 10);
    // Запоминаем размеры и индекс
    Idx := GetSize('A', Rows, Cols);
    // Далее нужно возвести все эл-ты в квадрат

    for I := 1 to Rows do
    begin
      RArray := GetRowAddress(Idx, I);
      for J := 0 to Cols - 1 do
        RArray[J] := RArray[J] * RArray[J];
    end;
  end;

end;

Смотрите также: