|
|
|
|
Delphi 1
Ошибка диалога настройки принтера
Я разместил в своем приложении вызов диалога настройки принтера.
Он вызывается из моего меню PrinterSetupDialog1.Execute ... пока вроде все нормально.
Теперь вот что странно: мое приложение может вызвать его только один раз.
При попытке вызвать его вторично ничего не происходит. Диалог не появляется.
Это "недавнообнаруженная" проблема. Для ее решения необходимо вызывать GetPrinter и SetPrinter перед каждым вызовом PrinterSetupDialog1.Execute:
|
var
Driver, 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]
|
|
|
|
|