Login | Register

Tiling a Bitmap across a forms Background

Posted by Sanjeev Sirigere on January 29th, 2004
This sample program show's how to tile a bitmap across a forms background. Any picture can be used - just remember that if you resize the form, you'll need to re-tile the bitmap again.

Screen shot

Download Zipped Project File (3k)

IT Offers

Comments

  • More Dynamic Way

    Posted by Legacy on 11/28/2001 12:00am

    Originally posted by: Andrew Leonard 

    Make a new Sub that will perform the same function.

    Let's say, ShowBitmap


    Private Sub ShowBitmap

        

        Dim HorizantalLimit As Integer

        Dim VerticalLimit As Integer

        Dim ii As Integer

        Dim jj As Integer

        

        HorizantalLimit = Width / Picture1.Width

        VerticalLimit = Height / Picture1.Height

        

        For ii = 0 To VerticalLimit 

            For jj = 0 To HorizantalLimit 

                PaintPicture Picture1, jj * Picture1.Width, ii  * Picture1.Height, Picture1.Width, Picture1.Height

            Next

        Next


    End Sub


    Call this Sub in Form Load, and also on Form Resize.  That way it will automatically load for you, and will resize itself as the dialog is resized.

    Reply
Leave a Comment
  • Your email address will not be published. All fields are required.

Go Deeper

Most Popular Programming Stories

More for Developers

Latest Developer Headlines

RSS Feeds