Ajuada! Como salvar o conteudo um TRichEdit

Question

Como fa�o para salvar o conteudo de um componente TRichEdit em um bando de dados sem que perca a formata��o do texto:Vou dar um exemplo://cdsEnviarMEN_CONTEUDO � um campo do tipo BLOB CdsEnviarMEN_CON...

Marcelo Saviski · Answer

Esta � uma aneira, eu nunca usei campos Blob, mas pelo que parece eles podem armazenar uma stream, ent�o, teste para ver se isso abaixo funciona:

[i:0949d9a07e][color=darkblue:0949d9a07e]//Salva o conte�do do RichEdit[/color:0949d9a07e][/i:0949d9a07e]

var
  Stream: TStream;
begin
  Stream : TMemoryStream.Create
  RichEdit.Lines.SaveToStream(Stream);
  BlobField.LoadFromStream(Stream);
  Stream.Free;
end;

[color=darkblue:0949d9a07e][i:0949d9a07e]//Carrega no RichEdit[/i:0949d9a07e][/color:0949d9a07e]

var
  Stream: TStream;
begin
  Stream : TMemoryStream.Create
  BlobField.SaveToStream(Stream);
  RichEdit.Lines.LoadFromStream(stream);
  Stream.Free;
end;

Reginaldo174 · Answer

Tenho uma solu��o meio maluca, mas foi a unica que consegui at� hoje.

Fa�a o seguinte :

- antes de salvar crie um arquivo externo do tipo texto e coloque nele o conteudo do Richedit;
- Depois Leia o arquivo externo em Tmemo;
- Salve o texto que est� no conteudo do Tmemo.

Dessa forma � salvo tipo o Html. Com tags que informam a sua formata��o.

- Para ler use um DBrichedt comum depois de gravado.

Marcelo Saviski · Answer

O c�digo que eu coloquei l� em cima seque mais ou menos essa mesma l�gica, s� que ao inv�s de slavar num arquivo externo, salva numa Stream, um peda�o de mem�ria tempor�rio....

F�rum Ajuada! Como salvar o conteudo um TRichEdit #260207