Здравствуйте.
Я вывожу массив так:
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
Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 1