Como passar os dados de um DBGRID para um DBMEMO

Question

Pessoal, <BR>eu tenho uma rotina de pesquisa onde um DBGRID recebe todo o resultado da pesquisa, por�m eu preciso que depois disso eu possa passar tudo

Bacalhau · Answer

Assumindo que a DBGrid est� ligada a uma table e pretendes acumular o resultado noutra table:

table2.edit; // tabela de destino
table2.fieldbyname(�Memo�).asstring := ��; // esvazia a memo
table2.post;

table1.first;
while not table1.eof do
begin
table2.edit;
table2.fieldbyname(�Memo�).asstring :=
table2.fieldbyname(�Memo�).asstring +
table1.fieldbyname(�Campo a integrar�).asstring;
table2.post;
table1.next;
end;