I've problem with clearing the drawing in PictureBox. The parts of a drawing are created with PictureBox1_ Paint Event like this: Name is one of the Subs (just part of a drawing). I've created a second event Timer1_Tick in which I want to clear the drawing created before but I can't reach it just with g.Clear(Color.White).
View 8 RepliesI have 4 control 3 button and 1 picturebox
vb.net
Private sub Button1 Dim bm As Bitmap = New Bitmap("D:Trening4 - Copy.bmp"
[code].....
I'm trying to save the lines I drew in a PictureBox as a bitmap, but it just returns blank images...This is the code I have now:
vb
'Draw a grid on PictureBox named draw
For x As Integer = 0 To bWidth
[code]....
My problem is centering the 0,0 points of my graph to the center of my picturebox
Dim picBoxWidth As Integer = picGraf.Size.Width
Dim picBoxHeight As Integer = picGraf.Size.Height
Dim halfWidth As Integer = picGraf.Size.Width / 2
[code]....
So how to I tell it to start at the center of my picturebox names (picgraf) btw.
I need some code to draw a resizable, draggable rectangular cursor (or selection box) on a picturebox. I found some excellent code (albeit rather old) that does just that, but on a form rather than a picturebox. I have tried converting the code - basically moving things to the picturebox events (Paint, MouseDown, MouseMove etc). It nearly works but leaves a trail behind it when you move or resize the cursor. In other words, the selection rectangle is not being erased before being drawn in the new position.
Is there some fundamental difference between drawing graphics on a form and drawing on a picturebox that would cause this behaviour? Something like, when you invalidate a form and cause a redraw it erases what you did last? If not, then I just need to dig a bit further and work out how the cursor is being erased from the previous position.
Here's the original code that works fine on a form:
Private DragRect As New RectangleF(20, 20, 100, 80)
Private Adornments(7) As RectangleF
Private MouseInRect As Boolean = False
[Code]....
'i using this code in the piicturebox1_paint
myusercolor=(sysytem.drawing.color.black)
myalpha=100
using g as graphics=graphics.fromimage(picturebox1.image)
[Code]....
by this code i have a problem that when i click the clear button the picturebox is cleared.but in the picturebox's mouseover the last drawn picture will appear.so i cant draw a new image ..
I've problem with clearing all the drawings I've created in my PictureBox. In fact I've created animation which stops after certain time and remains on the screen. The animation is created/painted with collection of about 25 TextBoxes - input of a user. Now I've added a button which clears all that info in TextBoxes and also should clear PictureBox -ictureBox.Refresh(). The problem is when I add new info in 25 TextBoxes nothing appears in PictureBox and I can't start an animation. Wondering why...
View 11 RepliesI've looked and tried.. and for some reason just don't seem to be getting right now.
I have a picturebox that is 250x500, I want to draw a vertical line from the top to the bottom.
Using gs = pbMap.CreateGraphics
'Do While x.X < 250
'gs.DrawLine(Pens.Red, x, y)
[Code].....
My program is giving the error: "End of statement expected" The red lines are the ones giving errors. I'm trying to draw lines on a picturebox to create a graph
Dim iScale As Single
Const Distance = 1000
pictureBoxGraph.ForeColor = QBColor(0)
[Code]....
This form has a picturebox and a button. The program draws a random line onto the picturebox every time the button is pressed. I want to modify the program so that it also draws a line onto the picturebox when the program is first run. I added a draw() to the form_load event but that didn't work. What do I need to do?
Public Class Form1
Dim x1 As Integer
Dim y1 As Integer
[code]....
I have here a code to draw on a picturebox and when I am trying to save the drawing, it seems that it cant detect whats inside the picturebox.
Here is my
Public Class Signature
Inherits System.Windows.Forms.Form
Dim mousePath As New System.Drawing.Drawing2D.GraphicsPath()
Dim myAlpha As Integer = 100 ' declare a Alpha variable
Dim myUserColor As New Color()
Friend WithEvents btnSave As System.Windows.Forms.Button
[Code] .....
I have try many different methods but still no avail.how to do this? As i found a good tutorial over
here where it create a resizable rectangle on a form. But what i want is on a picturebox with image.
I got down the drawimage part. The problem I am having, is when I draw another image, it replaces the old one. Here is my
vb
Public Class Form1
Dim PicPoint As Point
[Cod].....
How can I save the drawing that is in a picturebox to file?
Here is my code so far:
Private Sub PictureBox1_MouseDown(ByVal sender As Object, ByVal e As MouseEventArgs) Handles PictureBox1.MouseDown
If e.Button = MouseButtons.Left Then
[CODE]..........................
I am new to vb.net, from VB6. Trying to understand drawing a simple line graph into a picturebox, which was so simple in VB6 ! From code snippets, I can see the basic idea using an bitimage to draw the lines and then showing it in a picturebox. I don't understand how to (simulate) scaling of the bitmap's x/y scales like you could do with VB6's .Scale.
View 1 RepliesI have 1 image in picturebox. Now I draw some rectangles. I'm trying clear the image (only rectangles and left the image) without success.
Private Sub btnImageSelection_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnImageSelection.Click
Dim intImages As Integer = 0
Dim intImagesLine As Integer = 0
Dim intImagesColune As Integer = 0
picImage.Image = PictureBox1.Image
[Code] .....
The cycles for is for show the rectangules and works fine. but
i.Clear(Color.Blue)
The image is clear but the rectangles are showed and then unshowed.
VB 6 has a ScaleHeight and ScaleWidth property which VB 2008 does not support and this is causing me fits to work around. I'm trying to draw some lines (a graph) on a Picture Box (or a Panel) using my own coordinates (not pixels). This can't be all that hard can it?
View 3 RepliesI'm basically trying to make a simple, easy-to-use, paint program. I seem to be having problems with using multiple colors in the PictureBox1_Paint option. It draws the graphics but when you change the brush color and click in the picturebox it changes the colors of the previous graphics to the color you are currently trying to use. I need it to allow multiple colors.
Here's the code that I'm currently using..
Imports System.Drawing.Drawing2D
Public Class DynosPaint
Inherits System.Windows.Forms.Form
Private IsFormBeingDragged As Boolean = False
[code]....
I'm basically trying to make a simple, easy-to-use, paint program. I seem to be having problems with using multiple colors in the PictureBox1_Paint option. It draws the graphics but when you change the brush color and click in the picturebox it changes the colors of the previous graphics to the color you are currently trying to use. I need it to allow multiple colors.
Here's the code that I'm currently using..
Imports System.Drawing.Drawing2D
Public Class DynosPaint
Inherits System.Windows.Forms.Form
[code]....
I have a question about drawing a string on a picturebox in the form load event. So I have a picturebox on a form and in the form load event of this form I have this code:
Dim gx As Graphics = PictureX.CreateGraphics
Dim f As Font = New Font("Arial", 8)
Dim brr As Brush = New SolidBrush(Color.Black)
' Add the copyright text
gx.DrawString("1", f, brr, 2, 5)
But when I load the program nothing is drawn in the picturebox. Is there something wrong with the code or should I use the paint event of the picturebox?
By the way I also used this code in another program and there it works flawlessly, everything is drawn in the right place there when i load the program.
Problem1: I have a picturebox on a form. I have also managed to draw several PNG files with transparency onto the picturebox (see below). However, If I move the form outside the border and move it back, the image is gone. My source so far:
Dim k1 As New Bitmap(My.Resources.image1)
Dim k2 As New Bitmap(My.Resources.image2)
Dim drawMe As Graphics = PictureBox1.CreateGraphics
Dim bgcolor As Color = Color.FromArgb(128, 128, 128)
drawMe.Clear(bgcolor)
[Code]...
I'm drawing a chart in a pictruebox with a sub called Techart. After that I'm trying to turn the drawing into a bitmap, so that it will be persistant and also so that I'll be able to save it. This is what I've got from searching the forum:
[Code]...
I used a picturebox to allow user draw lines by mouse. I used this code in mouse down:
Dim D As New System.Drawing.Pen(DrawingColor, 2)
Dim g As Graphics = PB.CreateGraphics()
g.DrawLine(D, X1, Y1, X2, Y2)
but when a window appear on front of picturebox... its seams that picturebox redraw itself, so drawn lines erased.
I have a VB.NET Windows Forms app with a logo image on the form as a System.Drawing.Bitmap inside a PictureBox.I used the Visual Studio Designer to add the logo .bmp image so I don't currently have any VB code doing anything with it.I'd like to make the current logo a clickable object/button so when I click on it a file browser dialog opens and I can select a new image to replace the current image.The current image is a local resource and is set in a PictureBox as a System.Drawing.Bitmap.How would I replace that System.Drawing.Bitmap with a file selected from the file browser dialog?
View 1 RepliesIf I try to draw a circle by using e.g.
Code:
e.Graphics.DrawEllipse(Pens.Red, 50.133, 100.321, 0.1, 0.1)
I will get an error message. I tried something like
Code:
Public ObjectPoint As PointF
Dim cpoint As New PointF()
cpoint.ObjectPoint = New PointF(startX, startY)
e.Graphics.DrawEllipse(Pens.Blue, cpoint.ObjectPoint, 0.4, 0.4)
but it didn't work for the location and the circle size. How to draw a circle(and rectangle) by using floating point numbers?
I have a problem. Im trying to create a form that enables a user to add dots on a mouse click event over an office floor plan. I have searched the web and this site but still am struggerling. My aim is to be able to draw dots (purpose is to highlight problems) and polygons over the plan (purpose to define which service area the floor area relates). I want to save all graphics to an access database with associated
fields.
My thinking is to place a second picture box over the first and make this transparent and use this as the user interface? I dont expect anyone to solve this for me, however, any help with how to draw dots and polygons through mouse down or mouse click would be most helpful.
I have multiple textboxes that I clear once the task is done to be ready for the next set of information to be populated into the textboxes when the user opens the next file.In the textbox_TextChanged event I check to make sure there is some text in the textbox before running the code. Since I am clearing the textbox this fires the TextChanged event and causes me an error:
View 9 RepliesI'm doing an assignment for Uni and in my VB.NET form I have some checkboxes, I'm trying to loop through and clear them (I have a button which will clear the form). My problem is that there seems to be no property I can use to set the state of a checkbox when not explicitly telling VB which checkbox I want to use. for example, I can go
WineCheckBox.Checked = False
That will check the box, but I wand to DRY the code up a bit and not have to repeat this for each check box I have, this is what I was trying to do:
If TypeOf element Is CheckBox Then
element.Checked = False
End If
I've tried using element.CheckState and element.Checked and both times I get "Checked (or CheckState) is not a member of System.Windows.Forms.Control".
This is the whole block of code:
'clear the controls
For Each element As Control In Me.Controls
If TypeOf element Is TextBox Then
[Code] .....
Am just goin on 3 weeks of teaching myself vb2010 and have found a long way to do a simple task. Well it seems it should be a simple task. I have about 12 different listboxes spread over 3 different tabcontrols. There are 3 buttons that load all the listboxes according to which tabcontrol they are in. I found that when populating the listboxes it would not clear before loading the information so it would basically double post, triple post etc. I've figured out one way to do it that I've put in a sub and call the line before the tabcontrols are populated with their listboxes. Here is the sub:
[Code]...
It seems like a longwinded way to do this is their an easier way to have one command clear all listboxes within all tabpages within all tabcontrols on the form??
Basically I have a list box with a collection of strings. The way it works is you select an item from the list box then enter an integer into a text box and it calculates, straight forward.Where I'm getting tripped up is I'm trying to implement a 'Reset' button to reset the list box and text box. The text box is straight forward as is clearing the selection in the listbox:[code]I understand that since there is nothing selected the index is getting tripped up or whatever but I don't know how to stop this. I'm new to VB and programming in general and have been googling for days trying to get this fixed to no avail.
View 4 Replies