Здравствуйте.
Я вывожу массив так:
stringgrid1.Cells[j+1,i]:=floattostr(a[i,j]);
Но в учебнике по lazarus написано:
stringgrid1.Cells[i,j]:=floattostr(a[i,j]);
Почему у меня не работает второй вариант?
Модератор: Модераторы
Снег Север писал(а):от того данные приходится сдвигать на единицу
Azaza писал(а):Почему у меня не работает второй вариант?
Azaza писал(а):stringgrid1.Cells[j+1,i]:=floattostr(a[i,j]);
var a: array of array of real;
i,j,m,n:integer;
procedure TForm1.Button1Click(Sender: TObject);
begin
val(inputbox('','',''),n);
val(inputbox('','',''),m);
setlength(a,n,m);
stringgrid1.RowCount:=n;
stringgrid1.ColCount:=m+1;
for i:=0 to n-1 do
for j:=0 to m-1 do begin
a[i,j]:=random(20);
stringgrid1.Cells[j+1,i]:=floattostr(a[i,j]);
end;
Azaza писал(а):
- Код: Выделить всё
val(inputbox('','',''),n);
val(inputbox('','',''),m);
Azaza писал(а):Как удаётся использовать одни и те же буквы для разных параметров?
Что значит "разных"? Должны совпадать тип параметра и подставляемой переменной, а какой буквой вы их обозначите не имеет значения.Azaza писал(а):Как удаётся использовать одни и те же буквы для разных параметров?
Вернуться в Обучение Free Pascal
Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 15