Print Page | Close Window

TaskDialog Control

Printed From: Codejock Forums
Category: Codejock Products
Forum Name: Suite Pro
Forum Description: Topics Related to Codejock Suite Pro
URL: http://forum.codejock.com/forum_posts.asp?TID=15306
Printed Date: 28 September 2024 at 7:21am
Software Version: Web Wiz Forums 12.04 - http://www.webwizforums.com


Topic: TaskDialog Control
Posted By: BerbBrown
Subject: TaskDialog Control
Date Posted: 06 October 2009 at 4:38pm
Hi

In the help provided with Suite Controls 13.1 and 13.2, it shows the TaskDialog control with a progress bar.  When I display a TaskDialog the progress does not appear with the green glass bar.

He is my code:

    With tdmProgress
         .EnableMarkup = True
         .WindowTitle = "test"
         .MainIcon = xtpTaskIconWarning
         .MainInstructionText = "<TextBlock>Please be patient</TextBlock>"
         .ContentText = "<TextBlock TextWrapping='Wrap'>Test</TextBlock>"
         .MessageBoxStyle = True
         .UseComCtl32 = True
         .ProgressBarStyle = xtpTaskProgressBarMarquee
         .ShowDialog
     End With

I use the Constructed event to start the progress meter

Private Sub tdmProgress_Constructed()

    tdmProgress.StartProgressBarMarquee True, 20

End Sub



Replies:
Posted By: SuperMario
Date Posted: 08 October 2009 at 8:52am
Do you have a manifest file?  Also in VB6 manifest is only used when running the exe, not while in IDE.  You can use skinframework as well to do this.


Posted By: gibra
Date Posted: 14 November 2009 at 12:14am
Originally posted by SuperMario SuperMario wrote:

Do you have a manifest file?  Also in VB6 manifest is only used when running the exe, not while in IDE.  You can use skinframework as well to do this.
 
You can use XP Visual Styles in IDE, also.
To enable XP Visual Styles simply
- make a VB6.EXE.manifest
- put in ...\VB98 folder
- run VB6
 
Caution with Frame control, if you use:
- OptionButton become black
- CommandButton present a black border
- many controls may flicker when move mouse over it
Solution: put a PictureBox into Frame, then insert all control in he PictureBox.
 


-------------
gibra
CJ SuiteControl v: 13.x to 19.x
Windows 10 64bit
VS2019 - VB6.0 SP6
<a href="http://nuke.vbcorner.net/Home/tabid/36/language/en-US/Default.aspx" rel="nofollow">VS/VB 6.0 Installer v6.8



Print Page | Close Window

Forum Software by Web Wiz Forums® version 12.04 - http://www.webwizforums.com
Copyright ©2001-2021 Web Wiz Ltd. - https://www.webwiz.net