Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Печать содержимого TRxRichEdit ? [D7, XP]


Stepper ©   (2008-01-02 17:59:00) 

usesPrinters;

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 на принтер (печать), или есть что то конкретнее?


Stepper   (2008-01-02 20:09:00) [1]


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


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

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


{RASkov}   (2008-01-02 19:49:00) [2]

> [6] Stepper   (02.01.08 19:38)

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


Stepper   (2008-01-02 19:38:00) [3]


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


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

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

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

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

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


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


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

Воть! :)


{RASkov}   (2008-01-02 19:25:00) [4]

> [4] Stepper   (02.01.08 19:16)

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


Stepper   (2008-01-02 19:16:00) [5]


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


:)))

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


{RASkov}   (2008-01-02 19:05:00) [6]

> [2] Stepper   (02.01.08 19:01)

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


Stepper   (2008-01-02 19:01:00) [7]

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


{RASkov}   (2008-01-02 18:01:00) [8]

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

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


Наверх

Титульная страница Поиск, карта сайта Написать письмо