Forms - Zoom, Resize A Bitmap On Graphics Path And Save?
Jun 23, 2011
I am working on watermarking image.
In the below code I load the image to the graphics path using resource image and adding text on it. When I add the image through open file dialog it paints on the form with original size but I need to resize it, add it to the PictureBox, add text to it and give zoom and pan options to it and then I need to save with the original size.
When I resize and when save the image I endi up with a small image.
Here is my code:
Imports System.Collections.ObjectModel
Imports System.Drawing.Drawing2D
Public Class Form1
I'm having an issue with some code I'm trying to write that takes a screenshot of the current screen and saves it to a bitmap file on my local PC.
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim tempScreenshot = New Bitmap(Screen.PrimaryScreen.Bounds.Width,
I have 6 bitmaps, all the same size. Their ImageFormat is Format32bppPArgb. Sometimes when I try to resize the bitmaps I get the Out of Memory message. This doesn't happen all the time, only after about six or seven resizes.In Task Manager, the program's memory use never goes above 800k.Is there a way to resize a Bitmap without creating a new one?If I have to recreate the Bitmap, do I need to dispose the current one (or set it to Nothing)?
Problem drawing dotted path lines, with even dots along the path line.I want to draw a path line that can be any shape (square, round, outline etc), and along this path line I want even dots to appear.
I also want to be able to resize the shape (as in the example attached)This is very easy to do using "DrawPath" and defining points for the path and using a pen defined as dots.The problem I have is I want the dots to be evenly placed along the path, on any shape or size I draw.In the example I have created, I create a square with 4 points and draw a dotted path.There are 2 buttons that allows me to resize the square (larger or smaller) this helps show the problem more clearly.
The path starts at the top left corner and finishes back at the top left corner, the dots are evenly placed along the path, except the final dots at the end of the path. (Sometimes the dots are even and other times they are not even).The shapes I want to draw can be any size and any shape, but I have used a square in this example to show the problem I have. point me in the direction I need to go that allows me to draw the dots and give the impression that they are even all along the path, for all shapes and sizes.
In the pictures below if you change the size of the shape, one will have even looking dots, the other will not.
Ok major problem with a paint program i am making. When i have a window overlap or anything and move to side of screen and minimize and maximize i lose whats in the picturebox...Here is an example of the code I use to draw a line after click a button:
Private Sub btndraw_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnlinedraw.Click lxs = txtslinelocationx.Text lxe = txtelinelocationx.Text[code].....
Here is a picture of my program running: How do I stop everything being deleted when things pass it...? how can i add a save feature to this program?
Pretty self-explanatory question. I'm trying to see if I can do sprite animation in Visual Basic and, while I can use a Graphics object to translate a bitmap down a few pixels, I have absolutely no idea how to erase the bitmap drawn in its former position. Is there any way to erase the old image before the new image is drawn onto the form?
I am trying to use DrawString to write text as an image and then rotate it 90 degrees. It works fine with both a bitmap or directly on a PictureBox, but the big difference is in the quality. The PictureBox text drawn has great quality and looks nice. When I draw it on an image it looks horrible and blocky. I've made a few changes to try and get it to look nicer, but it doesn't look nearly as nice as it should.
Sample code:Use a Windows Forms project and place 2 picture boxes on it and a button and run it with the following code to see what I mean:Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
faster way to flood fill an area of a bitmap? It basically acts just like the fill flood bucket in MS Paint. clsBitmapImage is a Bitmap variable.
Code:
Code: Public Sub FloodFill(ByVal AtPoint As Point, ByVal newColor As Color) Dim oldColor As Color = clsBitmapImage.GetPixel(AtPoint.X, AtPoint.Y) If oldColor.ToArgb <> newColor.ToArgb Then
What i'm trying to do is fill a non rectangular region (actual build up out of 6 points) and draw a bitmap in such a way that it stretches with the region. Now for drawing a normal bitmap or even a trapezoid bitmap there are examples on the net. but drawing anything more then that with GDI+..
How do I rotate a bitmap image that has been placed in a picturebox? I need to make it appear upside down or rotated according to user input. I can't find anything in the properties to do this
I'm creating a custom form that is composed of a inner stroke, outer stroke, and rounded rectangular background. When the form is initially drawn its drawn fine without errors but once i re size it, the old form is still drawn and the new form is drawn below it but once i minimize the form and restore it, it goes back to normal (only the new form is being drawn).
How to implement resize begin and end on controls the way a Form does. I had the idea that this can be accomplished using windows messages API (WM_ENTERSIZEMOVE and WM_EXITSIZEMOVE) but most of the samples I've seen so far are for windows. The reason for this is because I have a control that needs to re-render an image. The controll is inside a split container. The split container has only the Resize event. Is there any way this can be done?
I need to let the end user move and resize objects (like a textbox or button). There are several examples that demonstrate this in VB, but not in VB Express 2008, based upon VB.net.It looks like earlier you needed to access Windows API, but these calls does not work in VB.net. I understand that these call are replaced by "native" .net calls, but I cannot find any that does the job.
A typial example from old VB is:
Private Declare Function GetWindowLong Lib "user32" Alias "GetWindowLongA" (ByVal hwnd As Long, ByVal nIndex As Long) As Long
I need to write a code to find identical adjacent pixels in a bitmap image. It should work as the 'magical wand' in Photoshop. My images are always black and white (white background with car parts drawed in black). Given the x,y coordinate for a single black pixel in the whole image, the code should find (and paint with another color, say red) all other black pixels that are linked to that one, and so on, until all linked black points will be painted in red.
I need to write a code to find identical adjacent pixels in a bitmap image. It should work as the 'magical wand' in Photoshop.My images are always black and white (white background with car parts drawed in black). Given the x,y coordinate for a single black pixel in the whole image, the code should find (and paint with another color, say red) all other black pixels that are linked to that one, and so on, until all linked black points will be painted in red.This way, suppose that I have an image with 4 car parts drawed, then if I give the x,y coordinate of a black pixel, just THAT part to whose the black pixel belongs to should be painted in red. All other parts will remain black. Does it make sense?At the end, there are two pictures (before and after) to help understanding what I need to do to the images.I tried a simple 8-pixel adjacent approach for every pixel (starting on initial coordinate) but it turns out into a very stupid and endless looping algorhitm.
I am trying to create bitmap with my text and transformation. I am sure that there is no error in my code. Because this code is worked previously. Here is my code.
i am drawing a string to a graphics object in the eg below and then transfering it onto a e.graphics in the paint event of a panel... when doing this the font edges appear dodgey...
Here is some
Dim b As New Bitmap(100, 100) Dim g As Graphics = Graphics.FromImage(b) g.DrawString("Bla Bla Bla", New Font("Comic Sans MS", 18,FontStyle.Bold), New LinearGradientBrush(g.ClipBounds, Color.Red,
I have a Form1 where i can add usercontrols during runtime. I draw their appereance in the OnPaint event using the GDI+ engine. The greate part is that i want to be able to resize these images during runtime wich goes pretty well now cause i draw points in percentage of the control. Unfortunetly it is very difficult to draw nice images/drawings ect with the GDI+ engine. Is there any other way in doing this?
I program for wm 2003 -pocket pc. in vbnet 2005. I have a picturebox which I load images into it with buttons click. I have another 2 buttons called zoom in and zoom out, what should I do with this buttons that it will function as zoom in and zoom out.
Back in the VB6 days, I could count on frmWhatever_Resize() to be fired when a form is loaded. That doesn't still seem to be the case. Since my resize event is filled with all the code I want that adjusts the size and placement of things, I decided to just call it from the end of the form's load event. That has no affect. I'm guessing that the form isn't actually shown until form_load is finished?
is there some other event that is fired when a form is shown, so I can call my resize code there?
