http://forum.codejock.com/ Copyright (c) 2006-2013 Web Wiz Forums - All Rights Reserved. Wed, 13 May 2026 14:30:28 +0000 Sat, 20 Oct 2012 05:54:03 +0000 http://blogs.law.harvard.edu/tech/rss Web Wiz Forums 12.04 360 forum.codejock.com/RSS_post_feed.asp?TID=20240 http://forum.codejock.com/forum_images/codejock-logo.gif http://forum.codejock.com/ http://forum.codejock.com/forum_posts.asp?TID=20240&PID=69113&title=printpreview-toolbar#69113 Author: MetallDesign
Subject: 20240
Posted: 20 October 2012 at 5:54am

Thats it... but no icons shows, can't set Imagemanager to Toolbar, Any Idee?

Set Toolbar = PrintPreview.Toolbar
    With Toolbar.Controls
        .DeleteAll
        .Add xtpControlButton, ID_VRVIEWER_DRUCKEN, "Drucken", , xtpButtonIconAndCaption
        .Add xtpControlButton, ID_VRVIEWER_ZOOMOUT, "", , xtpButtonIcon
        .Add xtpControlButton, ID_VRVIEWER_ZOOMIN, "", , xtpButtonIcon
        .Add xtpControlButton, ID_VRVIEWER_LINKS, "", , xtpButtonIcon
        .Add xtpControlButton, ID_VRVIEWER_RECHTS, "", , xtpButtonIcon
        .Add xtpControlButton, ID_VRVIEWER_SCHLIESSEN, "Schließen", , xtpButtonIconAndCaption
    End With]]> Sat, 20 Oct 2012 05:54:03 +0000 http://forum.codejock.com/forum_posts.asp?TID=20240&PID=69113&title=printpreview-toolbar#69113 http://forum.codejock.com/forum_posts.asp?TID=20240&PID=69112&title=printpreview-toolbar#69112 Author: MetallDesign
Subject: 20240
Posted: 20 October 2012 at 2:44am

Hi

How to set the Commandbars Toolbar as new PrintPreview Toolbar with VB6? My Code like

    Dim Toolbar             As CommandBar
    Dim Control             As CommandBarControl
   
    CommandBarsGlobalSettings.App = App
       
    CommandBars.EnableActions
    CommandBars.DeleteAll
   
    Set Toolbar = CommandBars.Add("Standard", xtpBarTop)
    With Toolbar
        AddControl .Controls, xtpControlButton, ID_VRVIEWER_DRUCKEN, "Drucken", True, , xtpButtonIcon
        AddControl .Controls, xtpControlButton, ID_VRVIEWER_ZOOMOUT, "Zoom Out", , , xtpButtonIcon
        AddControl .Controls, xtpControlButton, ID_VRVIEWER_ZOOMIN, "Zoom In", True, , xtpButtonIcon
        AddControl .Controls, xtpControlButton, ID_VRVIEWER_LINKS, "zurück", , , xtpButtonIcon
        AddControl .Controls, xtpControlButton, ID_VRVIEWER_RECHTS, "vorwärts", , , xtpButtonIcon
        AddControl .Controls, xtpControlButton, ID_VRVIEWER_SCHLIESSEN, "Schließen", True, , xtpButtonIcon
    End With
               
    Set CommandBars.Icons = ImageManager.Icons
   
    PrintPreview.Toolbar =

Thanks and brgds

Ramon
]]> Sat, 20 Oct 2012 02:44:55 +0000 http://forum.codejock.com/forum_posts.asp?TID=20240&PID=69112&title=printpreview-toolbar#69112