richedit

Tenta RichEdit1.Lines.Add(...)

Tentei
RichEdit1.Lines.Add ( DataModule2.busca.FieldValues[´Titulo´]);

rodou o programa, mas quando cliquei em pesquisar deu a mensagem de erro:
richedit1 lines insertion error.

RE1.Text := RE1.Text + Sua_String + #1310;

...ou tenta um memo!

Funcionou com Rich num exemplo que eu fiz...

So que só tras um, eu faço resultado de query em RichEdits na mão
até formatando o texto , fonte cor etc

Motta usei um dbrichedit e apareceu, mas que nem vc falou só aparece uma linha.
Como devo fazer para aparecer varias linhas?

Meu código está assim.

// Início
Form2.DBRichEdit1.Clear;
DataModule2.busca.First; //busca é a query
while not DataModule2.busca.eof do
begin
Form2.DBRichEdit1.DataSource := DataModule2.DataSource1;
DataModule2.busca.Next;
end;
Form2.ShowModal;
// Fim

faça assim

query1.close;
query1.open;
while not query1.eof do
begin
for i:=0 to query1.fieldcount-1 do
RichEdit1.Lines.Add(query1.fields[i].DisplayName + ´ : ´ +
query1.fields[i].AsString);
query1.next;
end;

pode ter erros pois nao testei