VBcoders Browse New Submit Contact Sign In

No account? Register free

Forgot password?

Analogic Clock

Custom Controls/Forms/Menus   Visual Basic 3.0   Beginner   Wed 3rd February 2021

An example for beginners, showing how to use the MoveToEx and LineTo API calls. Gets the current time, converts it into (x,y) coordinates and draw the "clock"...DON'T FORGET: DON'T EVEN THINK ABOUT VOTING FOR ME!!!

API Declarations
Public Declare Function MoveToEx Lib "gdi32" Alias "MoveToEx" (ByVal hdc As Long, ByVal x As Long, ByVal y As Long, lpPoint As POINTAPI) As Long
Public Declare Function LineTo Lib "gdi32" Alias "LineTo" (ByVal hdc As Long, ByVal x As Long, ByVal y As Long) As Long
Public Type POINTAPI
x As Long
y As Long
End Type

Rate Analogic Clock (6(6 Vote))

Download Analogic Clock

Analogic Clock Comments

No comments yet — be the first to post one!

Post a Comment

0/1000 characters