Common Dialog Control

Dialog Tisk
Dialog Tisk můžete využít v aplikaci například tak, že dáte uživateli možnost změnit nastavení tiskárny, kterou Vaše aplikace používá pro tisk. Nejdůležitější parametry, které je dobré nastavit před vyvoláním dialogu pro Tisk jsou:

Parametr Změny...
DialogTitle Titulek okna dialogu
Printer Default Jestli se má tiskárna nastavit jako výchozí
Flags Uživatelská nastavení
CancelError Zda se bude generovat chyba, když je stisknuto Storno

Následující kód zobrazí dialog pro tisk se zablokovaným výběrem rozsahu stránek a po potvrzení provede tisk vybraného textu z RichTextBox komponenty:

CommonDialog1.PrinterDefault = True
CommonDialog1.CancelError = True
' Nastavení vlastností - žádný výběr stránek, návrat ukazatele na tiskárnu
CommonDialog1.Flags = cdlPDReturnDC + cdlPDNoPageNums
If RichTextBox1.SelLength = 0 Then
    CommonDialog1.Flags = CommonDialog1.Flags + cdlPDAllPages
Else
    CommonDialog1.Flags = CommonDialog1.Flags + cdlPDSelection
End If
On Error Resume Next
CommonDialog1.ShowPrinter

If Err Then
    Msgbox "Tisk byl stornován !!!"
    Exit Sub
End If
RichTextBox1.SelPrint (Printer.hDC)

Zpět Další

Autor: The Bozena