by Eugene Wolff (3 Submissions)
Category: Complete Applications
Compatability: VB Script
Difficulty: Intermediate
Date Added: Wed 3rd February 2021
Rating: (7 Votes)
To demonstrate the use of the cards.dll shipped with windows. Only tested on Windows XP.
API DeclarationsPublic Declare Function cdtInit Lib "cards.dll" (ByRef width As Long, ByRef height As Long) As Long
Public Declare Function cdtDraw Lib "cards.dll" (ByVal hdc As Long, ByVal x As Long, ByVal y As Long, ByVal card As Long, ByVal cardtype As Long, ByVal color As Long) As Long
Download Card Trick (3 KB)