VBcoders Guest



Don't have an account yet? Register
 


Forgot Password?



Raindrops

by Scythe (20 Submissions)
Category: Graphics
Compatability: Visual Basic 5.0
Difficulty: Intermediate
Date Added: Wed 3rd February 2021
Rating: (12 Votes)

Draws Raindrops like most know from Javaapplet. Nice effect and now (updated) real fast.
New Version runs smoth on a 333MHz PC (compiled)

API Declarations
Private Declare Function GetDIBits Lib "gdi32" (ByVal aHDC As Long, ByVal hBitmap As Long, ByVal nStartScan As Long, ByVal nNumScans As Long, lpBits As Any, lpBI As BITMAPINFO, ByVal wUsage As Long) As Long
Private Declare Function SetDIBits Lib "gdi32" (ByVal hdc As Long, ByVal hBitmap As Long, ByVal nStartScan As Long, ByVal nNumScans As Long, lpBits As Any, lpBI As BITMAPINFO, ByVal wUsage As Long) As Long
Private Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" (Destination As Any, Source As Any, ByVal Length As Long)

Rate Raindrops

Download Raindrops

Download Raindrops (49 KB)

Raindrops Comments

No comments have been posted about Raindrops. Why not be the first to post a comment about Raindrops.

Post your comment

Subject:
Message:
0/1000 characters