Показать сообщение отдельно
  #6  
Старый 18.10.2013, 11:23
Аватар для Alegun
Alegun Alegun вне форума
LMD-DML
 
Регистрация: 12.07.2009
Адрес: Богородское
Сообщения: 3,025
Версия Delphi: D7E
Репутация: 1834
По умолчанию

Добавьте
Код:
StringGrid1.RowCount:= StringGrid1.RowCount+1;
и замените
Код:
StringGrid1.Cells[i, StringGrid1.RowCount-1]:= Fields[i].AsString;
Ответить с цитированием