Add Richtext Delphi line

Asked

Viewed 389 times

1

Good afternoon I have an application that text has to have Bold, Italic and underlined so I’m using a Trichtext. So far so good For the same work in printing I made Rtrlrichtext that gets the values from Trichtext.

However... if I insert blank lines so that the text appears in the middle or to the end of the page in the preview and printing does not come out as on the screen. I mean I can’t add lines.

Does anyone know how ?

1 answer

1

Try it like this:

Richedit1.SelAttributes.Color:=clBLue; // Cor Azul
Richedit1.SelAttributes.Style:=[fsBold,fsUnderline]; // Negrito e sublinhado
Richedit1.Lines.Add('Linha'); // Adiciona linha
Richedit1.SelAttributes.Style:=[]; // Volta ao estilo normal
Richedit1.SelAttributes.Color:=clBlack; // Volta à cor normal

I found this in a website

  • I did the tests here just do not print because I am without printer. Visually it adds the lines...

Browser other questions tagged

You are not signed in. Login or sign up in order to post.