Results 1 to 2 of 2

Thread: Fading a bitmap into the background?

  1. #1

    Thread Starter
    Member
    Join Date
    Nov 1999
    Location
    Singapore
    Posts
    32

    Post

    Hi,
    How do I fade a picture into the background.. like what happens in the Sonique control console?
    Thanks.

  2. #2
    New Member
    Join Date
    Jan 1999
    Location
    ITALY
    Posts
    12

    Post

    You can try using this code in your form1.paint event:

    Set bmp = LoadPicture("e:\mypicture.bmp")
    fx = Form1.ScaleHeight
    fy = Form1.ScaleWidth
    bx = bmp.Width
    By = bmp.Height
    xvolte = fx / bx + IIf(fx / bx <> 0, 1, 0)
    yvolte = fy / By + IIf(fy / By <> 0, 1, 0)
    For y = 0 To yvolte
    For x = 0 To xvolte
    Form1.PaintPicture bmp, x * bx, y * By, bx, By
    Next
    Next

    This function will paint a bitmap into the background of your application, and if the bitmap is smaller than the form it will reproduce it more times ( like the background of many web pages).
    I hope this can help you.

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •  



Click Here to Expand Forum to Full Width