dbgrid и memo

[Doget]

привет всем подскажите как с dbgrid скопировать данные в memo, memo.lines.add не работает, в чем фишка что то разобраться не могу, помогите пож.

[Stilet]

memo.lines.add не работает

Код в студию.

Кстати могеш воспользоваться DBMemo

[ArtInt]

вот код, который обращается к каждой колонке в цикле и выводит все в мемо

for I := 0 to DBgrid1.Columns.Count-1 do
begin
memo1.Lines.Add('колонка: '+DbGrid1.Columns.Items[i].Title.Caption);
for j := 0 to Adodataset1.RecordCount - 1 do // Iterate
begin
memo1.Lines.Add(DBGrid1.Columns.Ite ms[i].field.displaytext);
Adodataset1.Next;
end;
end;