GrapeCity.ActiveReports.Viewer.Win.v9 アセンブリ > GrapeCity.ActiveReports.Viewer.Win 名前空間 > Viewer クラス : Toolbar プロパティ |
'宣言 Public ReadOnly Property Toolbar As Viewer.ViewerToolbar
public Viewer.ViewerToolbar Toolbar {get;}
ビューのツールバーオプションの設定に使用するToolbarObject。
private ToolStripButton tsbPrint = new System.Windows.Forms.ToolStripButton(); private void Form1_Load(object sender, EventArgs e) { System.Windows.Forms.ToolStrip toolStrip; System.Windows.Forms.ToolStripItem orgItem; System.Windows.Forms.ToolStripButton orgBtn = null; // イメージ取得のために標準の印刷ボタンを取得します。 toolStrip = this.viewer1.Toolbar.ToolStrip; orgItem = toolStrip.Items[2]; if (orgItem is System.Windows.Forms.ToolStripButton) { orgBtn = (System.Windows.Forms.ToolStripButton)orgItem; } // 標準の印刷ボタンを削除します。 toolStrip.Items.RemoveAt(2); // 標準の印刷ボタンの代わりに、カスタムボタンを追加します。 if (orgBtn == null) { tsbPrint.Text = "印刷"; tsbPrint.ToolTipText = "印刷"; } else { tsbPrint.Text = orgBtn.Text; tsbPrint.ToolTipText = orgBtn.ToolTipText; tsbPrint.Image = orgBtn.Image; } tsbPrint.Enabled = false; // カスタムボタンのイベントハンドラを設定します。 tsbPrint.Click += this.PrintButtonClick; // カスタムボタンをツールバーに追加します。 toolStrip.Items.Insert(2, tsbPrint); } // Viewerにレポートがロードされた時に呼び出されるイベント。 private void viewer1_LoadCompleted(object sender, EventArgs e) { // カスタムボタンを有効にします。 tsbPrint.Enabled = true; } // カスタムボタンクリック時に呼び出されるイベント。 private void PrintButtonClick(System.Object sender, System.EventArgs e) { // 印刷処理を行います。 this.viewer1.Print(true, true, false); }
Private tsbPrint As New System.Windows.Forms.ToolStripButton Private Sub Form1_Load(...) Handles MyBase.Load Dim toolStrip As System.Windows.Forms.ToolStrip Dim orgBtn As System.Windows.Forms.ToolStripButton = Nothing Dim orgItem As System.Windows.Forms.ToolStripItem ' イメージ取得のために標準の印刷ボタンを取得します。 toolStrip = Me.Viewer1.Toolbar.ToolStrip orgItem = toolStrip.Items(2) If TypeOf orgItem Is System.Windows.Forms.ToolStripButton Then orgBtn = CType(orgItem, ToolStripButton) End If ' 標準の印刷ボタンを削除します。 toolStrip.Items.RemoveAt(2) ' 標準の印刷ボタンの代わりに、カスタムボタンを追加します。 If orgBtn Is Nothing Then tsbPrint.Text = "印刷" tsbPrint.ToolTipText = "印刷" Else tsbPrint.Text = orgBtn.Text tsbPrint.ToolTipText = orgBtn.ToolTipText tsbPrint.Image = orgBtn.Image End If tsbPrint.Enabled = False ' カスタムボタンのイベントハンドラを設定します。 AddHandler tsbPrint.Click, AddressOf Me.PrintButtonClick ' カスタムボタンをツールバーに追加します。 toolStrip.Items.Insert(2, tsbPrint) End Sub ' Viewerにレポートがロードされた時に呼び出されるイベント。 Private Sub Viewer1_LoadCompleted(...) Handles Viewer1.LoadCompleted ' カスタムボタンを有効にします。 tsbPrint.Enabled = True End Sub ' カスタムボタンクリック時に呼び出されるイベント。 Private Sub PrintButtonClick(ByVal sender As Object, ByVal e As System.EventArgs) ' 印刷処理を行います。 Me.Viewer1.Print(True, True, False) End Sub