Foxtable(狐表)用户栏目专家坐堂 → 指定打印机问题


  共有2430人关注过本帖树形打印复制链接

主题:指定打印机问题

帅哥哟,离线,有人找我吗?
304376480
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:339 积分:3760 威望:0 精华:0 注册:2017/9/7 15:20:00
指定打印机问题  发帖心情 Post By:2021/6/23 16:15:00 [只看该作者]

老师您好!
我自定义了专业报表的预览窗口!打印时如何指定打印机名称?
打印按扭上的代码:
_MyDoc.PrinterName = "HP LaserJet 6L"
_MyDoc.Print()

错误提示: PrinterName 不是 C1.C1Preview.C1PrintDocument 的成员

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:107757 积分:548124 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/6/23 16:37:00 [只看该作者]

_MyDoc是怎么定义的?

 回到顶部
帅哥哟,离线,有人找我吗?
304376480
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:339 积分:3760 威望:0 精华:0 注册:2017/9/7 15:20:00
  发帖心情 Post By:2021/6/23 18:42:00 [只看该作者]

在全局变量中定义的 _MyDoc
Public _MyRDL As C1.Win.C1Preview.C1PrintPreviewControl
Public _MyDoc As C1.C1Preview.C1PrintDocument

然后  Dim Doc As New PrintDoc '定义一个新报表
.....报表中的代码....
Doc.Body.Children.Add(ra)
_MyDoc = Doc
Forms("打印预览").Open '打开了预览窗口

一楼的代码就是预览窗口里的 打印按扭,



 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:107757 积分:548124 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/6/24 8:41:00 [只看该作者]

PrintDoc是foxtable自己封装的,才会有PrinterName 属性,C1PrintDocument是没有的。

试试

Doc.Body.Children.Add(ra)
Doc..PrinterName = "HP LaserJet 6L" _MyDoc = Doc

 回到顶部
帅哥哟,离线,有人找我吗?
304376480
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:339 积分:3760 威望:0 精华:0 注册:2017/9/7 15:20:00
  发帖心情 Post By:2021/6/24 9:13:00 [只看该作者]

试了4楼的方法,也不行啊,没有效果

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:107757 积分:548124 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/6/24 9:52:00 [只看该作者]

如果是内嵌预览窗口的用法,这个只能在预览窗口里选择打印机了


 回到顶部
帅哥哟,离线,有人找我吗?
304376480
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:339 积分:3760 威望:0 精华:0 注册:2017/9/7 15:20:00
  发帖心情 Post By:2021/6/24 11:58:00 [只看该作者]

预览窗口中打印时是可以选择打印机,但自带的打印按扭有问题,才使用的自定义打印按扭,

1.可以用代码设置,选择打印预览窗口的打印机吗?

2.怎么设置预览时默认显示尺寸为100%?

TopToolStripPanelVisible
BottomToolStripPanelVisible
LeftToolStripPanelVisible
RightToolStripPanelVisible
ContentPanel
LeftToolStripPanel
TopToolStripPanel
RightToolStripPanel
BottomToolStripPanel
ExportOptions
PreviewPane
Document
SsrsPaginated
AvailablePreviewActions
NavigationPanelVisible
StatusBarVisible
TextSearchPanelVisible
TextSearchUIStyle
ImageSet
ThumbnailViewCaption
OutlineViewCaption
PreviewThumbnailView
PreviewOutlineView
PreviewTextSearchPanel
PreviewProgressBar
PreviewStatusText
PreviewNavigationPanel
PreviewStatusBar
ToolBars
AutoScroll
AutoScrollMargin
AutoScrollMinSize
BackColor
BackgroundImage
BackgroundImageLayout
CausesValidation
ContextMenuStrip
Cursor
ForeColor
Controls
AutoScaleDimensions  自动缩放尺寸  (应该是调整这个来设置默认100显示吧,但我不会使用!求代码..)
AutoScaleMode
AutoValidate
BindingContext
ActiveControl
CurrentAutoScaleDimensions
ParentForm
AutoScrollPosition
DisplayRectangle
HorizontalScroll
VerticalScroll
DockPadding
AccessibilityObject
AccessibleDefaultActionDescription
AccessibleDescription
AccessibleName
AccessibleRole
AllowDrop
Anchor
AutoSize
AutoScrollOffset
LayoutEngine
Bottom
Bounds
CanFocus
CanSelect
Capture
ClientRectangle
ClientSize
CompanyName
ContainsFocus
ContextMenu
Created
DataBindings
IsDisposed
Disposing
Dock
Enabled
Focused
Font
Handle
HasChildren
Height
IsHandleCreated
InvokeRequired
IsAccessible
IsMirrored
Left
Location
Margin
MaximumSize
MinimumSize
Name
Parent
ProductName
ProductVersion
RecreatingHandle
Region
Right
RightToLeft
Site
Size
TabIndex
TabStop
Tag
Text
Top
TopLevelControl
UseWaitCursor
Visible
Width
WindowTarget
PreferredSize
Padding
ImeMode
Container
[此贴子已经被作者于2021/6/24 11:58:30编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:107757 积分:548124 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/6/24 12:04:00 [只看该作者]

1、没有办法
2、这玩意是设置窗口控件的缩放的,不是控制打印预览的内容缩放的

 回到顶部