painting pixels, lines and circles directly on a image.

[dcelso]

Hello, I would like do a mini mspaint like application.
I have a main menu to open and close a image.
I have a toppanel to create a palettepanel
I have a statusbar to put information
I have a tpicture on alclient to show the image.
I have a tool to paint pixel by pixel.

But now I need several tools more.
I would like start to painting a line. I like that the application do the next.
when i select "line tool" the first point that i select with the mouse will be the first point of my line, this is easy, but now i want paint a line between the selected point and the mouse current point until you press the mouse button again. And this is that i dont know how to do.
Anybody know how do it?
Thanks.

[dcelso]

I did it using lazcanvas. I create a tbitmap convert it on lazintfimage and with this i create lazcanvas. After this i use line,ellipse,polygon,rectangle methods.

[User137]

To draw something temporary on top of actual image, you can propably use something like TPaintBox (i have no experience with), or TImage.Canvas.