by Les Productions UnderDog (5 Submissions)
Category: Custom Controls/Forms/Menus
Compatability: Visual Basic 5.0
Difficulty: Advanced
Date Added: Wed 3rd February 2021
Rating: 
(8 Votes)
Here is my first submission since a "hacker" erased all the things of my repertoire.
Il s'agit d'un contrôle.It is a gauge showing pressure in psi having as value source in kPa.
(Because we use metric values at my work and because i still love imperial system) i made that Old Style Gauge.I tempted several manners to arrive at my purposes (almost the end), in the first place, a simple line for the needle, it did not seem real, then I had to draw a needle in three fragments to make her the smallest as possible and by using the method of
SetPixel and GetPixel. The only problem is that there is a refreshment in every consequentive change...Test it and why not try to improve it...
All the constructive messages are welcome.
API DeclarationsPrivate Declare Function SetPixel Lib "gdi32" (ByVal hdc As Long, ByVal x As Long, ByVal y As Long, ByVal crColor As Long) As Long
Private Declare Function GetPixel Lib "gdi32" (ByVal hdc As Long, ByVal x As Long, ByVal y As Long) As Long
Download OCX Gauge (193 KB)
VBcoders