Компонент StringGrid

Автор arsenikrmaks На чтение 2 мин

Для ввода (вывода) массива удобно использовать компонент StringGrid. Значок компонента StringGrid находится на вкладке Additional.

Компонент StringGrid представляет собой таблицу, ячейки которой содержат строки символов.

В таблице перечислены некоторые свойства компонента StringGrid.

Свойство	Определяет
Name	Имя компонента. Используется в программе для доступа к свойствам компонента
ColCount	Количество колонок таблицы
RowCount	Количество строк таблицы
Cells	Соответствующий таблице двумерный массив. Ячейка таблицы, находящаяся на пересечении столбца номер Col и строки номер Row определяется элементом Cells[Col, Row]
FixedCols	Количество зафиксированных слева колонок таблицы. Зафиксированные колонки выделяются цветом и при горизонтальной прокрутке таблицы остаются на месте
FixedRows	Количество зафиксированных сверху строк таблицы. Зафиксированные строки выделяются цветом и при вертикальной прокрутке таблицы остаются на месте
Options.goEditing	Признак допустимости редактирования содержимого ячеек таблицы. True – редактирование разрешено, False – запрещено
Options.goTab	Разрешает (True) или запрещает (False) использование клавиши Таb для перемещения курсора в следующую ячейку таблицы
Options.goAlways-ShowEditor	Признак нахождения компонента в режиме редактирования. Если значение свойства False, то для того, чтобы в ячейке появился курсор, надо начать набирать текст, нажать клавишу F2 или сделать щелчок мышью
DefaultColWidth	Ширину колонок таблицы
DefaultRowHeight	Высоту строк таблицы
GridLineWi-dth	Ширину линий, ограничивающих ячейки таблицы
Left	Расстояние от левой границы поля таблицы до левой границы формы
Top	Расстояние от верхней границы поля таблицы до верхней границы формы
Height	Высоту поля таблицы
Width	Ширину поля таблицы
Font	Шрифт, используемый для отображения содержимого ячеек таблицы
ParentFont	Признак наследования характеристик шрифта формы

Пример:

procedure TForml.ButtonlClick(Sender: TObject);

var

a : array[1..5] of integer;

summ: integer;

sr: real;

i: integer;

begin

for i:= 1 to 5 do

if Length(StringGridl.Cells[i-1, 0]) <>0

then

a[i] := StrToInt(StringGridl.Cells[i-1,0])

else

a[i] := 0;

summ := 0;

for i :=1 to 5 do

summ := summ + a[i]; sr := summ / 5;

Label2.Caption :=’Сумма элементов: ‘ + IntToStr(summ)+ #13+ ‘Среднее арифметическое: ‘ + FloatToStr(sr);

end;

Частые вопросы

Чем страница «Компонент StringGrid» отличается от главной Языки программирования Pascal и Delphi?

Это отдельная карточка или рубрика, а не дубль главной. Канонический адрес — текущий URL без www и с https.

Стоит ли покупать «Компонент StringGrid» только по этому тексту?

Нет. Текст помогает сравнить варианты, но финальный выбор зависит от вашего сценария, бюджета и актуальной оферты продавца.

Есть ли смысл читать FAQ, если уже есть рейтинг?

Да. FAQ отвечает на типовые вопросы выбора, рейтинг — на сравнение позиций. Это разные блоки одной страницы.

Что это за материал «Компонент StringGrid»?

Это редакционный разбор на Языки программирования Pascal и Delphi: коротко, кому подходит тема, какие критерии сравнения важны и где проверить актуальные условия у поставщика.