Показать сообщение отдельно
  #10  
Старый 24.06.2010, 17:52
Black Raider Black Raider вне форума
Местный
 
Регистрация: 31.05.2010
Адрес: Москва
Сообщения: 466
Версия Delphi: 7
Репутация: 40
По умолчанию

Код:
memo1.Clear;
  for i:=1 to 10 do
  begin
    st:='';
    for j:=1 to 10 do
    begin
      st:=st+inttostr(arr[i,j])+'  |  ';
    end;
    memo1.Lines.Add(st);
  end;
этот блок можете убрать и вставить заполнение стринггрида.
Ответить с цитированием