vb.net - how to create a picturebox in vb 2008 and move it? -


i want ask important question in vb2008 : i'm working on 2d level designer put images , collision rectangles in place program generate right code. problem : make button , in click event add new picture box , when add have move mouse , have "move" code know it's new picture box can't write code before picture box add.(if doesn't understand can explain situation again)

for more clear code :

private sub button2_click(byval sender system.object, byval e system.eventargs) handles button2.click      dim integer      newpicturebox.image = image.fromfile("c:\users\hp\desktop\ground.bmp")     newpicturebox.name = "image" & (i)     newpicturebox.visible = true     newpicturebox.top = 200     newpicturebox.width = 100     newpicturebox.height = 50     newpicturebox.left = 100 + gotoright     newpicturebox.sizemode = pictureboxsizemode.autosize     'add control form     controls.add(newpicturebox)     gotoright = gotoright + newpicturebox.width     += 1 end sub

and "move picturebox" code(it's existed picturbox):

    private sub timer1_tick(byval sender system.object, byval e system.eventargs) handles timer1.tick     dim endpoint integer = val(textbox1.text)     label1.text = "x: " & mouseposition.x - (location.x + 8)     label2.text = "y: " & mouseposition.y - (location.y + 29)     radiobutton1.left = endpoint + radiobutton2.left     panel1.left = 0      'move picture code :     if icanmove = true          picturebox1.left = mouseposition.x - (location.x + 8) - differencex         picturebox1.top = mouseposition.y - (location.y + 29) - differencey     end if   end sub  private sub picturebox1_mousedown(byval sender object, byval e system.windows.forms.mouseeventargs) handles picturebox1.mousedown     icanmove = true     differencex = (mouseposition.x - (location.x + 8)) - picturebox1.left     differencey = (mouseposition.y - (location.y + 29)) - picturebox1.top end sub private sub picturebox1_mouseup(byval sender object, byval e system.windows.forms.mouseeventargs) handles picturebox1.mouseup     icanmove = false end sub

thanks reading :)

you need add event handlers newly added picturebox, here how that.

private sub form1_load(sender object, e eventargs) handles mybase.load     dim newpicturebox picturebox = new picturebox     newpicturebox.parent = me     newpicturebox.location = new point(100, 100)     me.controls.add(newpicturebox)     'you can use existing event handlers picturebox1_mousedown     addhandler newpicturebox.mouseup, addressof picturebox_mouseup     addhandler newpicturebox.mousedown, addressof picturebox_mousedown end sub  private sub picturebox_mousedown(sender object, e mouseeventargs)     messagebox.show("triggered mousedown event") end sub  private sub picturebox_mouseup(sender object, e mouseeventargs)     messagebox.show("triggered mouseup event") end sub

(if remove picturebox's before closing form sure remove handlers them)
more info check addhandler , removehandler


Comments

Post a Comment

Popular posts from this blog

c# - Send Image in Json : 400 Bad request -

from android trying send image class of data, iis webservice. (c#) the problem 400 bad request . the image being encoded base64 . , placed json rest of class elements. my guess base64 not valid inside json. server not understand it. if set string "" , post accepted fine. so question is, how make base64 valid within json array? ( tried url.encode no success). or how should send image android webservice? gson gson = new gson(); string json = gson.tojson(record); // record has param { string base64photo } how big image? i'm pretty sure surpassing iis json size limit (default 4 mb). check http://geekswithblogs.net/frankw/archive/2008/08/05/how-to-configure-maxjsonlength-in-asp.net-ajax-applications.aspx or http://www.webtrenches.com/post.cfm/iis7-file-upload-size-limits good luck!
Read more

javascript - addthis share facebook and google+ url -

i attempting use addthis create simple url shares whichever current page user on when click share button. of right now, have twitter working. when user clicks, able see url populated in tweet box. when user clicks facebook or google+, url doesn't seem show in share box. <ul class="addthis_toolbox addthis_default_style "> <li><a class="addthis_button_facebook"><img src="/img/facebook-social.png" width="20" height="20" border="0" alt="share" /></a></li> <li><a class="addthis_button_twitter"><img src="/img/twitter-social.png" width="20" height="20" border="0" alt="share" /></a></li> <li><a class="addthis_button_google_plusone_share"><img src="/img/google-social.png" width="20" height="20" border="0" alt="s...
Read more

ios - Show keyboard with UITextField in the input accessory view -

i have buttona , when buttona clicked, want keyboard show uitextfield in inputaccessoryview. there way have keyboard show manually , set inputaccessoryview without having uitextfield initially? thanks. you cannot summon keyboard without object can become first responder. there 2 ways work around: subclass uiview , implement uikeyinput protocol in it. example: in .h file: @interface inputobject : uiview<uikeyinput> @property (nonatomic, copy) nsstring *text; @property (nonatomic, strong) uiview *inputaccessoryview; // must override inputaccessoryview , since it's readonly default @end in .m file, implement protocol: - (bool)canbecomefirstresponder { return yes; } - (bool)hastext { return [self.text length]; } - (void)inserttext:(nsstring *)text { nsstring *selftext = self.text ? self.text : @""; self.text = [selftext stringbyappendingstring:text]; [[nsnotificationcenter defaultcenter] postnotificationname:kinputobjec...
Read more