DrawSystemIcon - Draw a system icon on any device context [ All Languages » VB »  Graphics] Total Hit ( 3195) Rate this article:     Poor     Excellent   Submit Your Question/Comment about this article Rating

Click here to copy the following block Private Declare Function LoadIconByID Lib "user32" Alias "LoadIconA" (ByVal _   hInstance As Long, ByVal lpIconName As Long) As Long Private Declare Function DrawIcon Lib "user32" (ByVal hDC As Long, _   ByVal x As Long, ByVal y As Long, ByVal hIcon As Long) As Long Enum SystemIconConstants   IDI_APPLICATION = 32512   IDI_HAND = 32513   IDI_QUESTION = 32514   IDI_EXCLAMATION = 32515   IDI_ASTERISK = 32516   IDI_WINDOWS = 32517 End Enum ' draw a system icon on the specified device context Sub DrawSystemIcon(ByVal icon As SystemIconConstants, ByVal hDC As Long, _   ByVal x As Long, ByVal y As Long)   Dim hIcon As Long   ' get the handle of the icon   hIcon = LoadIconByID(0, icon)   ' draw it onto the specified device context   DrawIcon hDC, x, y, hIcon End Sub

Related Article(s)

Submitted By : Nayan Patel  (Member Since : 5/26/2004 12:23:06 PM)
	Job Description : He is the moderator of this site and currently working as an independent consultant. He works with VB.net/ASP.net, SQL Server and other MS technologies. He is MCSD.net, MCDBA and MCSE. In his free time he likes to watch funny movies and doing oil painting.
View all (893) submissions by this author  (Birth Date : 7/14/1981 )