VBcoders Browse New Submit Contact Sign In

No account? Register free

Forgot password?

Starwars Scroller V2.1

Scythe  (20 Submissions)   Graphics   Visual Basic 5.0   Intermediate   Wed 3rd February 2021

A transparent Starwars Scroller Control for About dialogs... U can load the Scrolltext from a File or crete it as string.You can change: Font, Scollspeed, Size... There is an Speedtest so it will sroll with the same speed on any PC....

API Declarations
Declare Function BitBlt Lib "gdi32" (ByVal hdcDest As Long, ByVal XDest As Long, ByVal YDest As Long, ByVal nWidth As Long, ByVal nHeight As Long, ByVal hDCSrc As Long, ByVal XSrc As Long, ByVal YSrc As Long, ByVal dwRop As Long) As Long
Declare Function GetTickCount Lib "kernel32" () As Long
Declare Function TextOut Lib "gdi32.dll" Alias "TextOutA" (ByVal hdc As Long, ByVal x As Long, ByVal y As Long, ByVal lpString As String, ByVal nCount As Long) As Long
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
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
Declare Function GetDriveType Lib "kernel32" Alias "GetDriveTypeA" (ByVal nDrive As String) As Long

Rate Starwars Scroller V2.1 (11(11 Vote))

Download Starwars Scroller V2.1

Starwars Scroller V2.1 Comments

No comments yet — be the first to post one!

Post a Comment

0/1000 characters