Советы по Delphi
Ошибка диалога настройки принтера
Я разместил в своем приложении вызов диалога настройки принтера. Он вызывается из моего меню PrinterSetupDialog1.Execute ... пока вроде все нормально. Теперь вот что странно: мое приложение может вызвать его только один раз. При попытке вызвать его вторично ничего не происходит. Диалог не появляется.
Это "недавнообнаруженная" проблема. Для ее решения необходимо вызывать GetPrinter и SetPrinter перед каждым вызовом PrinterSetupDialog1.Execute:
| varDriver, Device, Port: array[0..79] of Char;Mode: THandle;begin...GetPrinter(Driver, Device, Port, Mode);SetPrinter(Driver, Device, Port, 0);PrinterSetupDialog1.Execute;...end; |
Та же проблема возникает при использовании кнопки "Setup" из диалога печати.
-Steve Schafer [000719]
