Автор Sdfsd dsfsdf задал вопрос в разделе Другие языки и технологии
вывод элементов матрицы в StringGrid в делфи и получил лучший ответ
Ответ от Gennady[гуру]
Доброго времени суток.
Что "вывод элементов матрицы в StringGrid в делфи"? Как это сделать? Очень просто. Достаточно уяснить, что грид эта та же матрица, только элементы у нее имеют строковый тип. Это раз. Во-вторых, в отличие от массива, где порядок индексов такой [строка, столбец] , у грида первым индексом указывается столбец или в терминах грида, колонка, а вторым строка. Ну и, наконец, строки и колонки у грида нумеруются с 0. Все, если это понять, то какая проблема? Пусть есть матрица A[n,m] объявленная следующим образом
A : array[1..n,1..m] of Integer;
И ее надо переписать в грид. Устанавливаем размеры грида.
StringGrid1.RowCount := n;
StringGrid1.ColCount := m;
И начинаем переписывать.
for i:=1 to n do {цикл по строкам}
for j:=1 to m do {цикл по столбцам}
StringGrid1.Cells[j-1, i-1] := IntToStr(A[i,j]);
Вот и все.
Удачи!
Можно вот так.
procedure TForm1.Button1Click(Sender: TObject);
var A: array[0..10, 0..5] of Integer; i, j: Integer;
begin
StringGrid1.FixedCols:= 0;
StringGrid1.FixedRows:= 0;
StringGrid1.ColCount:= 11;
StringGrid1.RowCount:= 6;
for i:= 0 to 5 do
for j:= 0 to 10 do
StringGrid1.Cells[ i, j ]:= IntToStr(A[ i, j ]);
end;
Pascal, Label и GOTO помогите, просто я неумею пользоватся метками
var
i,j,sch,hka: integer;
h: tstringlist;
Label Metka;
begin
подробнее...
вывод на печать из базы даных delphi.
Вот процедура с готовой программы, вывод на печать со StringGrid.
В таблице 15 столбцов.
подробнее...
Вывод массива в Делфи
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes,
подробнее...
Вопрос по StringGrid Delphi
А чему у тебя равны RowCount и ColCount.
К примеру, я вот так заполняю StringGrid с именем
подробнее...
автозаполнение stringgrid в delphi7
У тебя несколько компонент грид?
StringGrid1
StringGrid2..3..6
Марк
подробнее...