VB °æ (¾«»ªÇø)

·¢ÐÅÈË: bloom (©À©Á©Â©Ã©Ä©Æ©Ç¨), ÐÅÇø: VB
±ê  Ìâ: CreateIC(É豸³¡¾°)(תÔØ)
·¢ÐÅÕ¾: ¹þ¹¤´ó×϶¡Ïã (2000Äê09ÔÂ07ÈÕ18:35:45 ÐÇÆÚËÄ), ×ªÐÅ

¡¾ ÒÔÏÂÎÄ×ÖתÔØ×Ô cnTemp ÌÖÂÛÇø ¡¿
¡¾ Ô­ÎÄÓÉ catchy Ëù·¢±í ¡¿
·¢ÐÅÈË: yucheng (ÎÞ»°¿É˵), ÐÅÇø: VisualBasic
·¢ÐÅÕ¾: BBS Ë®Ä¾Ç廪վ (Sun Apr  2 23:51:47 2000) WWW-POST

CreateIC 

VBÉùÃ÷ 
Declare Function CreateIC Lib "gdi32" Alias "CreateICA" (ByVal lpDriverName 
As String, ByVal lpDeviceName As String, ByVal lpOutput As String, lpInitData 
As DEVMODE) As Long 
˵Ã÷ 
ΪרÓÃÉ豸´´½¨Ò»¸öÐÅÏ¢³¡¾°¡£ÐÅÏ¢³¡¾°¿ÉÓÃÀ´¿ìËÙ»ñȡijÉ豸µÄÐÅÏ¢¶øÎÞÐë´´½¨É豸³¡
¾°ÕâÑùµÄϵͳ¿ªÏú¡£Ëü¿É×÷Ϊ²ÎÊý´«µÝ¸øGetDeviceCapsÒ»ÀàµÄÐÅÏ¢º¯ÊýÒÔÌæ´úÉ豸³¡¾°
²ÎÊý 
·µ»ØÖµ 
Long£¬Ö´Ðгɹ¦ÎªÐÅÏ¢³¡¾°¾ä±ú£¬Ê§°ÜÔòΪÁã 
²ÎÊý±í 
²ÎÊý ÀàÐͼ°ËµÃ÷ 
lpDriverName String£¬ÓÃvbNullString´«µÝnullÖµ¸ø¸Ã²ÎÊý£¬³ý·Ç£º1¡¢ÓÃDISPLAY£¬ÊÇ
»ñÈ¡Õû¸öÆÁÄ»µÄÉ豸³¡¾°£»2¡¢ÓÃWINSPOOL£¬ÔòÊÇ·ÃÎÊ´òÓ¡Çý¶¯ 
lpDeviceName String£¬ËùÓÃרÃÅÉ豸µÄÃû³Æ¡£¸ÃÃûÓÉ´òÓ¡¹ÜÀíÆ÷·ÖÅäÏÔʾ 
lpOutput String£¬ÓÃvbNullString´«µÝnullÖµ¸ø¸Ã²ÎÊý 
lpInitData DEVMODE£¬Õâ¸ö½á¹¹±£´æ³õʼֵ 
×¢½â 
Long£¬²»ÓÃʱһ¶¨ÒªÓÃDeleteDCº¯Êýɾ³ýÉ豸³¡¾°¡£½øÒ»²½µÄ˵Ã÷²Î¿¼CreateDCº¯Êý
 
ʾÀý£ºÎªÒ»¸öÃûΪ¡°Color Stylus¡±µÄ´òÓ¡»úÈ¡»ØÐÅÏ¢³¡¾° 
dc& = CreateICBynum("WINSPOOL", "Color Stylus", vbNullString,0) 


--

--
¡î À´Ô´:£®¹þ¹¤´ó×϶¡Ïã bbs.hit.edu.cn£®[FROM: casi.bbs@smth.org]
--
¡ù ×ªÔØ:£®¹þ¹¤´ó×϶¡Ïã bbs.hit.edu.cn£®[FROM: 202.118.247.254]
[°Ù±¦Ïä] [·µ»ØÊ×Ò³] [Éϼ¶Ä¿Â¼] [¸ùĿ¼] [·µ»Ø¶¥²¿] [Ë¢ÐÂ] [·µ»Ø]
Powered by KBS BBS 2.0 (http://dev.kcn.cn)
Ò³ÃæÖ´ÐÐʱ¼ä£º2.257ºÁÃë