掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
ActiveReportにて印刷を行うと、「給紙トレイの設定サイズと違う用紙がセットされています」のエラーがでる (ID:103378)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
API/定数の宣言です。 Private Const PD_PRINTSETUP As Long = &H40 Private Const GMEM_MOVEABLE As Long = &H2 Private Const GMEM_ZEROINIT As Long = &H40 Private Const GHND As Long = (GMEM_MOVEABLE Or GMEM_ZEROINIT) Private Const DM_OUT_BUFFER As Long = 2 Private Declare Function OpenPrinter _ Lib "winspool.drv" _ Alias "OpenPrinterA" _ (ByVal pPrinterName As String, _ phPrinter As Long, _ ByVal pDefault As Long) As Long Private Declare Function ClosePrinter _ Lib "winspool.drv" _ (ByVal hPrinter As Long) As Long Private Declare Function DocumentProperties _ Lib "winspool.drv" _ Alias "DocumentPropertiesA" _ (ByVal hwnd As Long, _ ByVal hPrinter As Long, _ ByVal pDeviceName As String, _ ByVal pDevModeOutput As Long, _ ByVal pDevModeInput As Long, _ ByVal fMode As Long) As Long Private Declare Function GlobalLock Lib "kernel32" _ (ByVal hMem As Long) As Long Private Declare Function GlobalUnlock Lib "kernel32" _ (ByVal hMem As Long) As Long Private Declare Function GlobalAlloc Lib "kernel32" _ (ByVal wFlags As Long, ByVal dwBytes As Long) As Long Private Declare Function GlobalFree Lib "kernel32" _ (ByVal hMem As Long) As Long Private Declare Sub CopyMemory Lib "kernel32" _ Alias "RtlMoveMemory" _ (hpvDest As Any, hpvSource As Any, ByVal cbCopy As Long) Private Type typPRINTDLG lStructSize As Long hWndOwner As Long hDevMode As Long hDevNames As Long hdc As Long Flags As Long nFromPage As Integer nToPage As Integer nMinPage As Integer nMaxPage As Integer nCopies As Integer hInstance As Long lCustData As Long lpfnPrintHook As Long lpfnSetupHook As Long lpPrintTemplateName As Long lpSetupTemplateName As Long hPrintTemplate As Long hSetupTemplate As Long End Type Private Declare Function PrintDlg _ Lib "comdlg32.dll" _ Alias "PrintDlgA" _ (pPrintdlg As typPRINTDLG) _ As Long Private Const CCHDEVICENAME As Long = 32 Private Const CCHFORMNAME As Long = 32 Private Type typDEVMODE dmDeviceName As String * CCHDEVICENAME dmSpecVersion As Integer dmDriverVersion As Integer dmSize As Integer dmDriverExtra As Integer dmFields As Long dmOrientation As Integer dmPaperSize As Integer dmPaperLength As Integer dmPaperWidth As Integer dmScale As Integer dmCopies As Integer dmDefaultSource As Integer dmPrintQuality As Integer dmColor As Integer dmDuplex As Integer dmYResolution As Integer dmTTOption As Integer dmCollate As Integer dmFormName As String * CCHFORMNAME dmUnusedPadding As Integer dmBitsPerPel As Integer dmPelsWidth As Long dmPelsHeight As Long dmDisplayFlags As Long dmDisplayFrequency As Long End Type
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.