Codejock Developer Community : popup control http://forum.codejock.com/ Copyright (c) 2006-2013 Web Wiz Forums - All Rights Reserved. Tue, 12 May 2026 23:12:48 +0000 Fri, 29 Dec 2017 08:34:08 +0000 http://blogs.law.harvard.edu/tech/rss Web Wiz Forums 12.04 360 forum.codejock.com/RSS_post_feed.asp?TID=23534 <![CDATA[Codejock Developer Community]]> http://forum.codejock.com/forum_images/codejock-logo.gif http://forum.codejock.com/ <![CDATA[popup control : Hello everyone,i want to change...]]> http://forum.codejock.com/forum_posts.asp?TID=23534&PID=76447&title=popup-control#76447 Author: coder41
Subject: 23534
Posted: 29 December 2017 at 8:34am

Hello everyone,

i want to change theme of popup control (office 2007 blue, black, office 2010 blue, black etc).

So i made some screenshot of themed forms and save them as png file.

I'm trying to use these files as background and put some text on it.

Test 1, i can see text, but there is no backgound bitmap.

Test 2, i have background image, but text is not visible.

Can you help?

Thank you for your support...

Test 1

With PopupControl1
        .RemoveAllItems
        .Icons.RemoveAll
        .Icons.LoadBitmap App.Path & "\files\t" & tema & ".png", 100, xtpImageNormal
        Set Item = .AddItem(25, 6, 396, 20, "Hello world")
        Item.TextColor = vbWhite
        .SetSize 396, 151
        .Show
End With

Result 1

    

Test 2

With PopupControl1
        .RemoveAllItems
        .Icons.RemoveAll
        .Icons.LoadBitmap App.Path & "\files\t" & tema & ".png", 100, xtpImageNormal
.BackgroundBitmap = 100
        Set Item = .AddItem(25, 6, 396, 20, "Hello world")
        Item.TextColor = vbWhite
        .SetSize 396, 151
        .Show
End With

Result 2



]]> Fri, 29 Dec 2017 08:34:08 +0000 http://forum.codejock.com/forum_posts.asp?TID=23534&PID=76447&title=popup-control#76447