You are not logged in.

Dear visitor, welcome to Jabaco - Community. If this is your first visit here, please read the Help. It explains in detail how this page works. To use all features of this page, you should consider registering. Please use the registration form, to register here or read more information about the registration process. If you are already registered, please login here.

Artisan Codesmith

Beginner

  • "Artisan Codesmith" is male
  • "Artisan Codesmith" started this thread

Posts: 1

Date of registration: Oct 24th 2012

Location: UK, Wales

Occupation: Programmer

  • Send private message

1

Thursday, October 25th 2012, 11:15am

Move a painted image..??

Here is an example code..

Source code

 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17

Option Explicit

Dim myimage As Resources = ExamplePng

Public Sub Form_Load()
   picTemp.Picture = myimage
   picTemp.Height = picTemp.Image.getHeight(Null)
   picTemp.Width = picTemp.Image.getWidth(Null)
   
   picCanvas.PaintPicture(picTemp.Image, 5, 5)
End Sub

Public Sub cmdMove_Click()
   picCanvas.Cls
   
   picCanvas.PaintPicture(picTemp.Image, 80, 5)
End Sub


So, instead of clearing picCanvas to move the painted image (ExamplePng/myimage) how could I go about moving the painted image directly, rather than clearing the entire canvas first?

Thanks for any help given and all is greatly appreciated. :)

Similar threads

Rate this thread
WoltLab Burning Board