Fórum richedit #207618

19/01/2004

0

como faço para mostrar uma pesquisa em sql em um richedit?
Para mostrar em um listbox eu utilizo:

ListBox.Items.Add( DataModule2.busca.FieldValues[´Titulo´]);

e no richedit?


Mrmario

Mrmario

Responder

Posts

19/01/2004

Beppe

Tenta RichEdit1.Lines.Add(...)


Responder

Gostei + 0

19/01/2004

Mrmario

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.


Responder

Gostei + 0

19/01/2004

Beppe

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

...ou tenta um memo!


Responder

Gostei + 0

19/01/2004

Motta

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


Responder

Gostei + 0

20/01/2004

Mrmario

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




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



Responder

Gostei + 0

21/01/2004

Motta

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


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar