Печать содержимого TRxRichEdit ?

← →
Stepper (2008-01-02 17:59) [0]

uses Printers;

procedure PrintStrings(Strings: TStrings); var Prn: TextFile; i: word; begin AssignPrn(Prn); try Rewrite(Prn); try for i := 0 to Strings.Count - 1 do writeln(Prn, Strings.Strings[i]); finally CloseFile(Prn); end; except on EInOutError do MessageDlg("Ошибка печати текста!", mtError, [mbOk], 0); end; end;

Корректна ли данная процедура для вывода содержимого TRxRichEdit на принтер (печать), или есть что то конкретнее?

← →
{RASkov} © (2008-01-02 18:01) [1]

> [0] Stepper (02.01.08 17:59)
> или есть что то конкретнее?

RxRichEdit1.Print("Идет печать моего документа");

← →
Stepper (2008-01-02 19:01) [2]

А как при выводе окна печати в разделе Свойств документа в строку Документ:
добавить сие типа - "Мой фаил" ?

← →
{RASkov} © (2008-01-02 19:05) [3]

> [2] Stepper (02.01.08 19:01)

Чего-чего??? :)Можно по русски...)

← →
Stepper (2008-01-02 19:16) [4]

> {RASkov} © (02.01.08 19:05) [3]

:)))

При Выходе окна Установленного по умолчанию в системе принтера в Разделе
Свойств документа
Документ: // тут лезет первая страка RxRichEdita а мне надо типа имя файла такого формата:
Свойств документа
Документ: Список // само название значения не имеет типа!

← →
{RASkov} © (2008-01-02 19:25) [5]

> [4] Stepper (02.01.08 19:16)

Эх..... все равно не понял :( Может запятых нехватает..... может еще чего....
Какое окно? куда выходит? куда окно установлено?....
Соберись, и ...задай вопрос :)
ЗЫ: А твой код из [0] не имеет такой проблемы?

← →
Stepper (2008-01-02 19:38) [6]

> Какое окно? куда выходит? куда окно установлено?....

При выполнении сего кода:
...
RxRichEdit1.Print("Идет печать моего документа");
...

Выходит окно уст в системе принтера с выводом данных о печатаемом документе!

В ентом окне есть TGroupBox (Свойства документа) в нутри которого есть строка
...
Документ: // тут лезет первая страка RxRichEdita а мне надо типа имя файла такого формата:
...

В которой идет вывод имени печатаемого документа!

Так вот как в нее вывести произвольный текст (Мой док) а не первую страку RxRichEdita

> ЗЫ: А твой код из [0] не имеет такой проблемы?

Имеет другую! Поле Документ: // здесь пусто
...
PrintStrings(RxRichEdit1.Lines); // пример использования!
...

Воть! :)

> [6] Stepper (02.01.08 19:38)

Ну незнаю.... может у твоего принтера драйвер "кривой"....
Я вот только что попробывал - все нормально.
У моего драйвера (принтер Сапоп Пиксма MP160)
Имя документа: Идет печать моего документа
а не первая строка.

← →
Stepper (2008-01-02 20:09) [8]

> {RASkov} © (02.01.08 19:49) [7]
> Ну незнаю.... может у твоего принтера драйвер "кривой"..

Так и есть! HP (струйник) ф топку))) Лежал старенький матричный раритет (тоже кстати HP) так я его проинсталил и заюзал на нем сей код - Итог: то что нужно! Все пишет где нужно!

Спс за выдержку и совет!

Печать содержимого TRxRichEdit ? Найти похожие ветки