draw circles

[knranjit]

my points are:
10,10
20,20
30,30
40,40
and so on ....
With these points I can draw many lines continuosly.
Then I would like to place the small circle in the
connecting points like
20,20
30,30
40,40
and so on.....
How to do?

[msnews.microsoft.com]

try this....

Dim gobj as Graphics = <activeform>.CreateGraphics()
gobj.Graphics.DrawEllipse(New Pen(Color.Black, 3), 10, 10, 10, 10)

Manasvin

"knranjit" <kn******@rediffmail.com> wrote in message
news:07****************************@phx.gbl...

my points are:
10,10
20,20
30,30
40,40
and so on ....
With these points I can draw many lines continuosly.
Then I would like to place the small circle in the
connecting points like
20,20
30,30
40,40
and so on.....
How to do?

[One Handed Man [ OHM# ]]

Tested . .

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles Button1.Click

Dim g As Graphics

Dim i As Single

g = Me.CreateGraphics()

For i = 10 To 40 Step 10

PlotPoint(i, i, 8, g)

Next

End Sub

Private Sub PlotPoint(ByVal x As Single, ByVal y As Single, ByVal diameter
As Single, ByVal g As Graphics)

Dim blackPen As New Pen(Color.Black, 1)

g.DrawLine(blackPen, (x - 1), (y - 1), (x + 1), (y + 1))

g.DrawEllipse(blackPen, x - (diameter / 2), y - (diameter / 2), diameter,
diameter)

End Sub

Regards - OHM

[Armin Zingler]

"knranjit" <kn******@rediffmail.com> schrieb

my points are:
10,10
20,20
30,30
40,40
and so on ....
With these points I can draw many lines continuosly.
Then I would like to place the small circle in the
connecting points like
20,20
30,30
40,40
and so on.....
How to do?

You are a really funny guy! Are you getting paid for each new thread on
nearly the same subject? Seems so... Could you solve the previous problem in
the previous thread(s)? I asked several question to try to help you but you
didn't answer again. Very strange... I've already tried to explain by email
why ignoring all our replies and questions just trying to help you might
lead in getting no answer anymore in the future. Concerning me I am not
gonna reply again - seems to be "for the recycle bin".
--
Armin (not amused)

http://www.plig.net/nnq/nquote.html
http://www.netmeister.org/news/learn2quote.html

[Ken Tucker [MVP]]

Hi,

In addition to the other comments the pen has a startcap and endcap
properties. It allows you to have line start with a circle, square, or
arrow.

Dim p As New Pen(Color.Red)

p.EndCap = LineCap.RoundAnchor

p.StartCap = LineCap.ArrowAnchor

e.Graphics.DrawLine(p, 10, 250, 100, 250)

Ken
-----------------------
"knranjit" <kn******@rediffmail.com> wrote in message
news:07****************************@phx.gbl...

my points are:
10,10
20,20
30,30
40,40
and so on ....
With these points I can draw many lines continuosly.
Then I would like to place the small circle in the
connecting points like
20,20
30,30
40,40
and so on.....
How to do?

[One Handed Man [ OHM# ]]

See,
This is the kind of thing which was annoying me back some two
months ago, but I got flamed for saying the similar thing to you.

Regards - OHM
Armin Zingler wrote:

"knranjit" <kn******@rediffmail.com> schrieb

my points are:
10,10
20,20
30,30
40,40
and so on ....
With these points I can draw many lines continuosly.
Then I would like to place the small circle in the
connecting points like
20,20
30,30
40,40
and so on.....
How to do?

You are a really funny guy! Are you getting paid for each new thread
on nearly the same subject? Seems so... Could you solve the previous
problem in the previous thread(s)? I asked several question to try to
help you but you didn't answer again. Very strange... I've already
tried to explain by email why ignoring all our replies and questions
just trying to help you might lead in getting no answer anymore in
the future. Concerning me I am not gonna reply again - seems to be
"for the recycle bin".

--
Best Regards - OHM

O_H_M{at}BTInternet{dot}com

[Armin Zingler]

"One Handed Man [ OHM# ]" <O_H_M{at}BTInternet{dot}com> schrieb

See,
This is the kind of thing which was annoying me back some
two
months ago, but I got flamed for saying the similar thing to you.

??
Could you please explain?
--
Armin

[One Handed Man [ OHM# ]]

PPL, not responding. Saying thanks etc

OHM

Armin Zingler wrote:

"One Handed Man [ OHM# ]" <O_H_M{at}BTInternet{dot}com> schrieb

See,
This is the kind of thing which was annoying me back some
two
months ago, but I got flamed for saying the similar thing to you.

??
Could you please explain?

--
Best Regards - OHM

O_H_M{at}BTInternet{dot}com

[Armin Zingler]

"One Handed Man [ OHM# ]" <O_H_M{at}BTInternet{dot}com> schrieb

PPL, not responding. Saying thanks etc

Yes, but I can't remember I didn't respond (well, rarely *g*). You wrote "I
got flamed for saying the similar thing to you.". As this was *your* reply
to *my* message I assumed *you* said *you* got flamed saying similar things
to *me*. ;-))

Man, complication about nothing. ;-)

[ ] EOT

:-)
--
Armin

http://www.plig.net/nnq/nquote.html
http://www.netmeister.org/news/learn2quote.html