Controls - Popup Control

Print Page | Close Window

Popup Control

Printed From: Codejock Forums
Category: Codejock Products
Forum Name: Controls
Forum Description: Topics Related to Codejock Controls
URL: http://forum.codejock.com/forum_posts.asp?TID=11948
Printed Date: 24 September 2024 at 2:58pm
Software Version: Web Wiz Forums 12.04 - http://www.webwizforums.com

Topic: Popup Control

Posted By: markp.uk
Subject: Popup Control
Date Posted: 24 August 2008 at 2:28pm

Can anyone tell me how to create a popup control without using a form, i want to use it as a splash screen during loadup, so want to create it from module not from a form with ocx

Cheers.

-------------
The weekend has landed.....

Long live the weekend!!!

Product: Xtreme SuitePro

(ActiveX) version 16.3.1

Platform: Windows XP (32bit) - SP 3

Language: Visual Basic 6.0 SP6

Replies:

Posted By: Oleg
Date Posted: 25 August 2008 at 1:52am

Try

Dim p

Private Sub PushButton1_Click()
Set p = CreateObject("Codejock.PopupControl." & XtremeSuiteControls.Version)

p.Show
End Sub

-------------
Oleg, Support Team
CODEJOCK SOFTWARE SOLUTIONS

Posted By: markp.uk
Date Posted: 25 August 2008 at 3:25am

Cheers Oleg,

The popup is created fine, but does not seem to appear unless there is a break in the code, if not the popup is not displayed until after the main form is loaded; any ideas would be appreciated.

-------------
The weekend has landed.....

Long live the weekend!!!

Product: Xtreme SuitePro

(ActiveX) version 16.3.1

Platform: Windows XP (32bit) - SP 3

Language: Visual Basic 6.0 SP6

Posted By: Aaron
Date Posted: 25 August 2008 at 4:29am

Hi,

If you put the code in the form load event, object will be destroyed when form load event is done. This is what you want, right?

Call DoEvents will solve your problem. Maybe you need to call DoEvents several times. Depends what's called inside every function.

-------------
Product: Xtreme SuitePro (ActiveX) version 15.0.2
Platform: Windows XP (32bit) - SP 2
Language: Visual Basic 6.0

Zero replies is not an option....