RichEdit

[tocas]

Подскажите как отправить на печать текст отформатированный программно. У меня печатает со стандартными параметрами шрифта. Буду благодарен.

[igh0st]

Печатаешь RichEdit1.Print ?

[tocas]

Сообщение от igh0st

Печатаешь RichEdit1.Print ?

var
Stroka:System.Text;
i:integer;
begin
AssignPrn(Stroka);
Rewrite(Stroka);
Printer.Canvas.Font:=Form1.RichEdit 1.Font;
for i:=0 to Form1.RichEdit1.Lines.Count-1 do
Writeln(Stroka,Form1.RichEdit1.Line s[i]);
System.Close(stroka);

[igh0st]

Попробуй вывести что-нибудь с помощью метода Print

[tocas]

Сообщение от igh0st

Попробуй вывести что-нибудь с помощью метода Print

Спасибо за подсказку. Такой простой способ, а я о нем даже не подумал.