Ò׽ؽØÍ¼Èí¼þ¡¢µ¥Îļþ¡¢Ãâ°²×°¡¢´¿ÂÌÉ«¡¢½ö160KB

Delphi ÍêȫʱÉÐÊÖ²áÖ® Visual Style ƪ

    ÕâÀïÏÈ˵˵Á½¸ö¸ÅÄTheme(Ö÷Ìâ)ºÍ Visual Style ¡£Theme ×îÔç³öÏÖÔÚ Microsoft Plus! for Windows 95 ÖУ¬ÊÇ Windows ÖÐ Wallpaper¡¢Cursors¡¢Fonts¡¢Sounds ¡¢Icons µÈµÄÉèÖÃÖµ¼¯ºÏ¡£Visual Style ÔÚ Windows XP Öвű»ÒýÈ룬Visual Style ¹æ¶¨ÁË Contorls µÄÍâ¹Û£¬ÁíÍ⻹°üÀ¨Ê¹ÓÃÕâЩÍâ¹ÛµÄÒ»Ì× API ¡£Ê¹Óà Visual Style ±ØÐëÒª ComCtl32.dll 6£¬¶ø ComCtl32.dll 6 ÊDz»Äܱ»·Ö·¢µ½ÒÔǰ°æ±¾µÄ Windows Öеģ¬ËùÒÔÖ»ÄÜÔÚ Windows XP ÏÂʹÓà Visual Style¡£
    Delphi 7 (ºóÃæ¼ò³Æ 7 °É)¶Ô Visual Style ÌṩÁ˽ϺõÄÖ§³Ö¡£Ê×ÏÈ 7 ½«ÄǸö Menifest ·â×°³ÉÁË VCL - TXPMenifest£¬ÁíÍâÔö¼ÓÁË UxTheme.pas µ¥Ôª£¬ÀïÃæÊÇ¶Ô Visual Style µÄÒ»Ì× API ¼°Æä½á¹¹¡¢³£ÊýµÈµÄÒýÓÃÉùÃ÷£¨´ó¸ÅÓÐ 47 ¸öAPI º¯Êý£©£¬¸üÖØÒªµÄÊÇ 7 »¹Ôö¼ÓÒ»¸ö Themes.pas µ¥Ôª£¬ÀïÃæÊǶÔÕâÌ× API µÄ¸ü½øÒ»²½µÄ¼ò»¯ºÍ·â×°£¬7 Ï嵀 Win32 ¿Ø¼þ¶Ô Visual Style µÄÖ§³Ö½Ï Delphi 6ÓÐÁ˺ܴó¸Ä¹Û£¬¾ÍÊÇÕâ¸öµ¥ÔªµÄ¹¦ÀÍ¡£
    Ò»°ãÀ´ËµÒªÊ¹ 7 ϱàÒëµÄ³ÌÐòÔÚ Windows XP ¾ßÓÐ Visual Style £¬Ö»ÐèÔÚÖ÷´°ÌåÉÏ·ÅÈë VCL - TXPMenifest ¼´¿É£¬µ«¶ÔÓÚһЩ·Ç±ê×¼»òÊÇ×Ô»­µÄ¿Ø¼þ£¬»¹ÊǾ­µäµÄ½çÃæ¡£ÕâÀï¾Í˵һÏÂÈçºÎÓà Themes.pas ÖÐÌṩµÄ·½·¨Ê¹ÕâЩ¿Ø¼þ¾ßÓÐ Visual Style ¡£
    Themes.pas ÖÐÖ»ÓÐÒ»¸öÀࣺTThemeServices ¡£Õâ¸öÀàÓÐÒ»¸öÖØÒªµÄÊôÐÔ£º ThemesEnabled (Boolean ÀàÐÍ)£¬¾ÍÊÇÅжÏÔÚµ±Ç°³ÌÐòÄܲ»ÄÜʹÓà Visual Style £¬Õâ¸öÊôÐÔÖ»ÓÐÔÚ³ÌÐòʹÓÃÁË TXPMenifest ²¢ÇÒÔÚ Windows XP ÏÂÔËÐв¢ÇÒʹÓÃÁË Windows XP µÄÖ÷Ì⣨¼´×ÀÃæÖ÷Ìâ²»ÊÇ Windows ¾­µä£©²ÅΪ True £¬ÓÉÓÚ³ÌÐòÒªÔËÐÐÔÚÒÔǰ°æ±¾µÄ Windows Ï£¬ËùÒÔÄãµÄ³ÌÐòÒ²µÃÌṩÕâ¸öÊôÐÔΪ False ʱµÄ´¦Àí¹ý³Ì£¨Ò»°ã¾ÍÊÇÔ­ÓеĴ¦Àí¹ý³Ì£©¡£»¹ÒªÌáÒ»ÏÂÕâ¸öÀà·â×°µÄ¼¸¸öÖØÒªº¯Êý£ºDrawEdge ÓÃÀ´»­¿Ø¼þ±ß½çµÄ£¬DrawElement ÓÃÀ´»­Õû¸ö½çÃæµÄ£¬DrawText ÓÃÀ´Ð´×ֵġ£Õâ¸öÀ໹´¦ÀíÁË WM_THEMECHANGED ÏûÏ¢£¬ÕâÑùµ±ÎÒÃÇÔڸıä×ÀÃæÖ÷Ìâºó£¬³ÌÐò»á×Ô¶¯µ÷ÕûÍâ¹Û¡£ÔÙ˵һÏÂÎÒÃÇ×î³£Óõ½µÄÒ»¸öº¯Êý£¨¶à̬º¯Êý£©£ºGetElementDetails £¬Õâ¸öº¯ÊýµÄ·µ»ØÖµÔÚÉÏÃæµÄ¼¸¸ö DrawXXX º¯ÊýÖÐÒªÓõ½£¬Õâ¸öº¯ÊýµÄÊäÈëÖµÊÇ 24 ¸öö¾ÙÀàÐÍÖеÄÔªËØ£¬Õâ 24 ¸öö¾ÙÀàÐÍÔÚ Themes.pas µ¥Ôª¿ªÍ·¶¨Ò壨´ÓµÚ¶þ¸ö TThemedButton ¿ªÊ¼Ö±µ½ TThemedWindow£©¡£×îºó£¬ÎÒÃDz»È¥Ö±½ÓʹÓÃÕâ¸öÀ࣬ÔÚ Themes.pa


Ïà¹ØÎĵµ£º

ʹÓÃDelphiÄÚÖú¯Êý¶ÁдINIÎļþ


ÀûÓÃWindows APIº¯ÊýWritePrivateProfileString ºÍGetPrivateProfileString¿É¶Ô.INIÎļþ½øÐжÁд²Ù×÷¡£Æäʵ£¬¶Ô.INIÎļþµÄ¶ÁдÍêÈ«¿ÉÒÔÀûÓÃDelphiµÄÄÚÖú¯ÊýÀ´ÊµÏÖ¡£ÏÂÃæ¾Í½éÉÜһЩ¶Ô.INIÎļþ¶ÁдʱÏà¹ØµÄÀ༰ÆäÊôÐÔ·½·¨¡£
1¡¢TIniFile¶ÔÏó
ÒÔDelphiÖУ¬¶¨ÒåÁËÒ»¸öTIniFile¶ÔÏ󣬽«.INIÎļþ·â×°ÔÚÆäÖУ¬²¢ÌṩһЩ·½·¨£ ......

Delphi 7¸ßЧÊý¾Ý¿â³ÌÐòÉè¼Æ

ÄÚÈݼò½é
    dbExpressÊÇBorland¹«Ë¾ÏÂÒ»´úÊý¾Ý·ÃÎʼ¼Êõ¡£±¾Êé²»½öÏêϸ½éÉÜÁËdbExpressµÄ»ù±¾¹¦ÄÜ¡¢Ê¹Óü¼ÇÉÒÔ¼°Delphi/KylixµÄDataSnap¼¼Êõ£¬»¹ÏêϸÌÖÂÛÁËdbExpressµÄʵÏÖÔ­ÀíÒÔ¼°dbExpressµÄδÀ´·¢Õ¹Ç÷ÊÆ¡£±¾Êé½á¹¹ÇåÎú£¬½²½â͸³¹£¬ÊµÀý·á¸»¡£×÷ÕßÀîάÊÇBorland¹«Ë¾ÖøÃû¼¼Êõר¼Ò£¬ÔøÖøÓжಿDelphiÃû ......

unicodeÓëGB2312ת»»µÈDelphiº¯Êý


{ º¯Êý : RESULTSTRING = HexToBin(HEXSTRING)
{ Ä¿µÄ : °ÑÊ®Áù½øÖÆ×Ö·û´®×ª»»Îª¶þ½øÖÆ×Ö·û´®
{
{===============================================================}
{ º¯Êý : RESULTINTEGER = HexCharToInt(HEXCHAR)
{ Ä¿µÄ : ת»»Ò»¸öÊ®Áù½øÖÆ×Ö·ûΪÕûÊý
{==================================================== ......

DelphiÏÔʾºÍÒþ²Ø´°Ìå

Ò»¸öºÜ¼òµ¥µÄÎÊÌ⣬µ«ÎÒÆ¾ÎÒѧϰC++/VCÒ»Äê¶à£¬½Ó´¥DelphiµÄʱ¼äÒ²²»¶ÌÁË£¬µ«ÈÔȻд²»³öÀ´¡£
±¾À´ÒÔΪ£¬²»¾ÍÊǽ«Form1.ShowºÍForm1.Hideô£¬µ«È´¾ÍÊÇ´ïµ½²»µ½×Ô¼ºÏëÒªµÄ½á¹û
Õâ¸öÎÊÌâµ¹²»ÓÃ×÷ÉîÈëÑо¿ÁË£¬µ½ÊÇÈÃÎÒ·¢ÏÖ£¬DelphiÒ²²»ÊÇÐÅÊÖÕªÀ´£¬Ê²Ã´¶¼ÊÇÄÇôÈÝÒ׵ģ¬ÒÔΪ×Ô¼ºÓеã¶ùVCµÄµ××Ó£¬¾ÍС¿´ÁËDelphi¡£
×î½üÒ»¶Îʱ ......

Delphi ActiveX FormµÄʹÓÃʵÀý

 Delphi ActiveX FormµÄʹÓÃʵÀý
By knityster
1. ActiveX¿Ø¼þ¼ò½é
ActiveX¿Ø¼þÒ²¾ÍÊÇÒ»°ãËù˵µÄOCX¿Ø¼þ£¬ËüÊÇActiveX¼¼ÊõµÄÒ»²¿·Ö¡£
ActiveX¿Ø¼þ¿ÉÒÔ±»¼¯³Éµ½ºÜ¶àÖ§³ÖActiveXµÄÓ¦Óõ±ÖÐÈ¥£¬»òÕßÖ±½ÓÓÃÀ´À©Õ¹Ó¦ÓõŦÄÜ£¬ÕâЩ֧³ÖActiveXµÄÓ¦ÓðüÀ¨C++ Builder¡¢Delphi¡¢Visual dBASE¡¢ Visual Basic¡¢Visual C++¡ ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ