Не Обновляется Содержимое Tprintdialog

Тема в разделе "Delphi - Компоненты", создана пользователем pinkmouse, 10 авг 2013.

  1. pinkmouse

    pinkmouse New Member

    Регистрация:
    6 авг 2009
    Сообщения:
    4
    Симпатии:
    0
    Delphi 7. При выборе принтера в диалоговом окне TPrintDialog, принтер выбирается, но параметры печати беруться (размер бумаги, разрешение) от принтера по умолчанию и если в диалоге не нажать свойства" и не поставить правильные настройки на печать задание пойдет в выбранный принтер, но с настройками бумаги от принтера по умолчанию. Причем во всплывающем окне при нажатии кнопки"свойства" видны именно параметры от принтера по умолчанию. Так вот, как туда "подгрузить" настройки от выбранного в диалоговом окне принтера?
     
  2. pinkmouse

    pinkmouse New Member

    Регистрация:
    6 авг 2009
    Сообщения:
    4
    Симпатии:
    0
    Я выяснил, такая хрень происходит не со всеми параметрами, а только с "особым форматом бумаги" , (это ленточный принтер этикеток), вместо него лепит А4. Как победить?
     
  3. pinkmouse

    pinkmouse New Member

    Регистрация:
    6 авг 2009
    Сообщения:
    4
    Симпатии:
    0
    Короче он все формыты бумаги ставит по умолчанию, из настроек принтера их не берет.
     
  4. pinkmouse

    pinkmouse New Member

    Регистрация:
    6 авг 2009
    Сообщения:
    4
    Симпатии:
    0
    Я так понял, что это компонент кривой, правильно считывает свойства принтера, если только принтер установлен по умолчанию. При выборе принтера из списка формат бумаги ставит первым в списке форматов принтера. Вордовский диалог печати такой болячкой не болеет. Может кто сталкивался, как лечить то?
     
  5. sinkopa

    sinkopa Well-Known Member

    Регистрация:
    17 июн 2009
    Сообщения:
    344
    Симпатии:
    9
    Чего лечить то? :)
    Tprintdialog ничего сам не делает. Как собственно и любой другой диалог... После закрытия диалога Вы должны взять параметры которые пользователь "накликал ручками" и назначить нужному принтеру.
    Вот приблизительно так http://www.scalabium.com/faq/dct0020.htm
    Нужный принтер выбирается установкой Printers.Printer.PrinterIndex;
    Список принтеров можно получить из Printers.Printer.Printers
    Короче... почитайте
    Вот на вскидку несколько ссылок:

    http://www.delphibasics.co.uk/RTL.asp?Name=TPrintDialog
    http://www.delphidabbler.com/tips/104
    http://delphi.about.com/cs/adptips2001/a/bltip1001_5.htm
    Или Гугл :)
     
Загрузка...

Поделиться этой страницей