Dúvidas com RichText

16/08/2004

Bom dia..
Estou desenvolvendo um módulo em meu sistema que é a criação /emissão de cartas de cobrança, para isto estou utlizando o componente RichText.

Existe alguma forma de inserir linhas em um richtext formatado à partir de um certo ponto?
Ex: eu estou utilizando tag, e na hora de imprimir eu substituo a tag pelo campo que eu quero assim:
  for i := 0 to Text1.Lines.Count do
  begin
    if Pos(´<CLINOM>´,Linha) > 0 then
    begin
      Text1.Lines[i&93; := AnsiReplaceStr(Text1.Lines&91;i&93;,´<CLINOM>´,CdsCliCLINOM.Value);


Até ai tudo bem, mas eu também gostaria de inserir os títulos do cliente,
ai percorrendo as linhas quando eu encontrasse a tag[b:82bd723398] <DADOS>[/b:82bd723398]
seria a hora de percorrer o sql e mostrar os campos.
Aguém sabe como insiro linhas em um RichText já formatado, ou como posso copiar de um para outro respeitando a Formatação?

Grato
Fausto


Faustoalves