Want to win a PS4? Go Premium and enter to win our High-Tech Treats giveaway. Enter to Win

x
?
Solved

How can I make the image I drag on the picture semi transparent

Posted on 2009-07-03
6
Medium Priority
?
340 Views
Last Modified: 2012-05-07
How do I refresh the picture to remove the semi transparent overlays
How do I move the semi transparent over lays
you gave me code on how to drag pictures on top of each other
you had suggested just dragging a rubberband around and the redrawing in the spot it is dropped
below is the code that you gave me slightly modified
Private Sub Newpicture(ByVal location As Point, ByVal img As Image)
        Dim pic As New PictureBox
               pic.Image = img 'Image.FromFile("C:\Documents and Settings\Dov\My Documents\My Pictures\brains upload.bmp")
        AddHandler pic.MouseUp, AddressOf pic_Mouseup
        AddHandler pic.MouseDown, AddressOf pic_MouseDown
        AddHandler pic.MouseMove, AddressOf pic_MouseMove
        Me.Controls.Add(pic)
        pic.Parent = PictureBox1
        pic.BringToFront()
        pic.Location = location
        pictureb.Add(pic)
 Private Sub pic_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs)
        If e.Button = Windows.Forms.MouseButtons.Left Then
            startPt = New Point(e.X, e.Y)
        End If
    End Sub
    Private Sub pic_mouseup(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs)
        If e.Button = Windows.Forms.MouseButtons.Left Then
            For Each ctl As Control In pictureb
                If (Not (ctl Is sender)) AndAlso (sender.Bounds.IntersectsWith(ctl.Bounds)) Then
                    MsgBox("l") ' ...you have a "collision"...
                End If
            Next
 
        End If
    End Sub
 
    Private Sub pic_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs)
        If e.Button = Windows.Forms.MouseButtons.Left Then
            Dim pic As PictureBox = CType(sender, PictureBox)
            pic.Location = New Point(pic.Location.X + (e.X - startPt.X), pic.Location.Y + (e.Y - startPt.Y))
        End If
    End Sub

Open in new window

0
Comment
Question by:Dov_B
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
  • 3
  • 3
6 Comments
 
LVL 86

Accepted Solution

by:
Mike Tomlinson earned 2000 total points
ID: 24831165
Hey Dov_B,

Sorry I haven't gotten to this sooner.   =\

The overlay code in the related question is NOT compatible with the code in this question.

There are two mutually exclusive approaches:
(1) Transparency thru floating windows (each PictureBox in its own form).
(2) Transparency thru composite imaging (as demonstrated in the related question).

With #2, you only have ONE PictureBox and all the different images are drawn into a single image.  The code in this question is creating multiple PictureBoxes.

Do you want to extend the RELATED question code so that you can move around the images?
...or heavily modify this code to demonstrate #1?
0
 

Author Comment

by:Dov_B
ID: 24839911
Thank you for your help
I probably dont know enough to answer your question
what my gut instinct tells me is to go with the simplest method
let me tell you a bit more what I have in mind
I have one large image onto which I want to overlay smaller images
I could probably just group the smaller images on the edge of the form
click the one I wish to select
then click on the spot on the larger image where I want to overlay it
then just have the code which you used to mix the images into one picturebox do its thing
how would I do that?
then I guess when I wanted to remove the overlays I would simply empty the picture box and reload the original background image
0
 

Author Comment

by:Dov_B
ID: 24839956
I would like if possible to have just say some kind of square the size of the image to follow the mouse movements over the background image so that the user sees where he is going to end up putting it
0
Concerto Cloud for Software Providers & ISVs

Can Concerto Cloud Services help you focus on evolving your application offerings, while delivering the best cloud experience to your customers? From DevOps to revenue models and customer support, the answer is yes!

Learn how Concerto can help you.

 

Author Comment

by:Dov_B
ID: 24910279
I want to extend the RELATED question code so that you can move around the images
0
 
LVL 86

Expert Comment

by:Mike Tomlinson
ID: 24910310
I'll see if I can code something up for you this week...   =)
0
 
LVL 86

Expert Comment

by:Mike Tomlinson
ID: 24940117
Apologies Dov_B...I keep letting this one slide to the bottom of my "inbox".  =\

Just been busy this week running around w/ the kids as it's summertime.

I promise to get something on this posted soon!
0

Featured Post

VIDEO: THE CONCERTO CLOUD FOR HEALTHCARE

Modern healthcare requires a modern cloud. View this brief video to understand how the Concerto Cloud for Healthcare can help your organization.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

1.0 - Introduction Converting Visual Basic 6.0 (VB6) to Visual Basic 2008+ (VB.NET). If ever there was a subject full of murkiness and bad decisions, it is this one!   The first problem seems to be that people considering this task of converting…
Calculating holidays and working days is a function that is often needed yet it is not one found within the Framework. This article presents one approach to building a working-day calculator for use in .NET.
In this video, Percona Director of Solution Engineering Jon Tobin discusses the function and features of Percona Server for MongoDB. How Percona can help Percona can help you determine if Percona Server for MongoDB is the right solution for …
Want to learn how to record your desktop screen without having to use an outside camera. Click on this video and learn how to use the cool google extension called "Screencastify"! Step 1: Open a new google tab Step 2: Go to the left hand upper corn…
Suggested Courses

610 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question