double arrow

ЛАБОРАТОРНАЯ РАБОТА 4


Разработка приложения с использованием массивов

Цель лабораторной работы: изучить свойства компоненты TStringGrid. Написать программу с использованием массивов.

Краткие сведения

Работа с массивами

Массив есть упорядоченный набор однотипных элементов, объединенных под одним именем. Каждый элемент массива обозначается именем, за которым в квадратных скобках следует один или несколько индексов, разделенных запятыми, например: а[1], bb[I], с12[I, j*2], q[l, 1, I*j-l]. В качестве индекса можно использовать любые порядковые типы за исключением LongInt.

Тип массива или сам массив определяются соответственно в разделе типов (Type) или переменных (Var) с помощью ключевого словаArray следующим образом:

Array [описание индексов]of <тип элементов массива >

Примеры описания массивов:

Const N=20; // Задание максимального значения индекса;

Type

TVector = array [1..N] of real; // Описание типа одномерного массива;

Var

A : TVector; //A - массив типа TVector;

Ss : array[1..10] of integer; //Ss - массив из десяти целых чисел;

Y : array[1..5, 1..10] of char; //Y -двумерный массив символьного типа.

Элементы массивов могут использоваться в выражениях так же, как и обычные переменные, например:

F:= 2*a[3] + a[ss[l] + 1]*3;

A[n]:= 1+sqrt(abs(a[n-1]));

Компонент TStringGrid

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

Cells[ACol, ARow : integer] : string;

где ACol, ARow - индексы элементов двумерного массива. Свойства ColCount и RowCount устанавливают количество строк и столбцов в таблице, а свойства FixedCols и FixedRows задают количество строк и столбцов фиксированной зоны. Фиксированная зона выделена другим цветом, и в нее запрещен ввод информации с клавиатуры.

Заказать ✍️ написание учебной работы
Поможем с курсовой, контрольной, дипломной, рефератом, отчетом по практике, научно-исследовательской и любой другой работой

Сейчас читают про:
Поможем в написании
> Курсовые, контрольные, дипломные и другие работы со скидкой до 25%
3 569 лучших специалисов, готовы оказать помощь 24/7