| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
PrintDialog [D6, WinME]
Alexor © (2003-05-22 00:32:00)Вызываю PrintDialog - пользователь выбирает принтер. Теперь нужно распечатать QReport-ский репорт. Как ему (QReport-у) указать тот принтер каторый вабрал рользователь?
Помогите пожалуйста! Я просто больше не знаю где искать ответ.
Pat (2003-05-23 12:23:00) [1]На каждый Printer найдется свой QRPrinter © где-то прочитал
QuickReport использует свой QRPrinter, и работать надо с ним © местный FAQ
Сергеєєв Володимир (2003-05-23 11:47:00) [2]Никак ты его из стандартногo TPrintDialog не достанешь.
Я с этим имел продолжительные половые отношения месяц. В итоге все закончилось тем, что я переписал свой диалог печати.
Первая мысль была открыть Dialogs.pas и посмотреть метод Execute, чтобы вызвать Апи напрямую, без диалога Апи, посмотрел описание (по WinApiRus.hlp, де-то здесь валяется в документации. Большое спасибо автору). Ни в одной из передаваемых в функцию структур нет Индекса принтера. Спрашивается, нафиг тоды она нужна эта функция?
Насколько я разобрался че там происходит, то получается следующее: когда приложение стартует, то в нем по дефолту берется принтер по умолчанию виндов. Далее, при вызове Апи внутри самой Апи меняется принтер по дефолту для программы. А потом, после вызова Апи в методе Execute происходит переинициализация глобальных переменных. Это все хорошо, для Мемо всяких там, РичЭдитов. Но QReport берет принтер только в момент создания. И поэтому, вызов принтДиалога ему по-барабану.
Но это еще полбеды. Допустим, ты уже знаешь индекс требуемого тебе принтера. Метод QReport.PrinterSettings.ApplySettings(QPrinter :TQPrinter) в версии QReport3.0 работает через раз, а в Винде98 вообще не работает. До того, как я апгрейдил QReport я решал эту проблему просто перенастройкий принтера по дефолту виндов. Сперва менял принтер по дефолту виндов на требуемый, потом печатал, а потом возвращал на место.
Alexor (2003-05-23 00:38:00) [3]Спасибо,
Меня интересует именно то, как этот индекс принтера (выбранного) достать из PrintDialog-a ?
if PrintDialog1.Execute then
begin
QuickReport1.PrinterSettings.PrinterIndex:=???;
...
QuickReport1.Print;
end;
Роман Василенко (2003-05-22 09:16:00) [4]
QuickReport1.PrinterSettings.PrinterIndex:=printer.Printers.IndexOf("Название выбранного принтера");
либо
QuickReport1.PrinterSettings.PrinterIndex:=Индекс твоего принтера в списке
| |
