¹ØÓÚDELPHIÎÊÌâµÄ - Delphi / ÓïÑÔ»ù´¡/Ëã·¨/ϵͳÉè¼Æ
ÎÒÊÇDELPHIµÄ³õѧÕߣ¬µ«ÀÏʦҪÇóÎÒÃÇ×ö¿Î³ÌÉè¼Æ£¬´ÓÊé±¾ÀïÃ濽ÁË´úÂë×Ô¼ºÑо¿£¬µ«ÀÏÊdzöÎÊÌ⣬ÓÐËÊÇÕâ·½ÃæµÄ¸ßÊÖ°¡£¬ÄÜ·ñÁôϸöÁªÏµµÄ·½Ê½°ï°ïæ°¡
³öʲôÎÊÌ⣬Çë¾ßÌå˵Ã÷
·¢ÏÖ¡¢½â¾öÎÊÌâµÄ¹ý³Ì¾ÍÊÇѧϰµÄ¹ý³Ì
ÀÏÊÇÌáʾ¡°saµÇ¼ʧ°Ü¡±£¬ÊDz»ÊǸú¿âûÁ¬½ÓºÃ°¡
³öÏÖÕâÖÖ´íÎóµÄÎÊÌâºÜ¶à£¬ÂýÂýÅŲ顣
¹âÓдúÂ룬ÎÞÊý¾Ý¿â¡£°ÑÊý¾Ý¿â½¨Á¢ÆðÀ´ÔÙÔËÐÐ
¿âÓÐÆðÀ´ÁË£¬ Óë¿âÁ¬½ÓµÄÄǸö´úÂëÊÇÕâÑùµÄ
const
connectionStr='Provider=SQLOLEDB.1;'+'Password=sa;Persist Security Info=true;'+
'User ID=sa;Initial Catalog=±ÏÒµÉú¾ÍÒµ¹ÜÀíϵͳ;'+'Date Source=(local)';
ÕâÑùÓ¦¸Ãû´í°É¡£ ÇëÎÊÏ Õâ±ßsaÊDz»ÊDz»Äܸİ¡
Õâ¸öÂ𣬿â½á¹¹ ±í½á¹¹ µÇ¼·½Ê½ µÈµÈ ×îºÃ»¹ÊÇ×Ô¼ºÉè¼ÆµÄºÃ
¿´±ðÈ˵ĴúÂë »á´óÁ¿µÄ³ö´í ²¢²»ÈÝÒ×ÅÅ´í
Õâ¸öÎÊÌâ¿ÉÒԲ鿴Êý¾Ý¿âÃÜÂëÓÐûÓÐд¶Ô£¬»òÕßÃÜÂëÊÇ·ñÓб£´æ
»Ø¸´7Â¥£ºÎÒûÉèÊý¾Ý¿âµÄÃÜÂë°¡£¡ÒªÉèÂð£¿
Êý¾Ý¿âĬÈÏÃÜÂëΪ¿Õ¡£
ѧϰÖÐ
ºÇºÇ£¬ÂýÂýÀ´£¬²»ÒªÅÂÑÛÇ°µÄÀ§ÄÑ£¬³õѧÕß¹²Ãã
×Ô¼ºÍϸöADOConnection¿Ø¼þ£¬¿´ÊÇ·ñ¿ÉÒԳɹ¦Á¬½ÓÊý¾Ý¿â
¿ÉÒÔÁË¡£Ð»Ð»
Ïà¹ØÎÊ´ð£º
Ò»°ã¶¼ÊÇÔõô½Ó»îµÄ£¿
ÊÕÈëÔõôÑù
sohu£¿soho£¿
sohu ¿ÉÄÜÊÇsmall office house unit
С°ì¹«ÊÒ£¬°Ñ¼Ò±ä³Éµ¥Î»¡£
È¥Íþ¿ÍÍø°¡,ºÜ¶à¸öÄØ,»¹ÓÐÍâ°üµÄÍøÕ¾
ѧϰѧϰ¡£
ÏÖÔÚDelphi×ö¶«Î÷²»ÐÐÁË,´¦ÓÚÌÔÌ×´ ......
delphi 數據類ÐÍ ¶¨義A~Z 為ÓÐÐòÐÍ£¬A為×îС£¬Z×î´ó¡£
Delphi(Pascal) code:
var
arr:array ['A'..'Z'] of Char;
Óü¯ºÏ¸ã¶¨
Ôõ麼È¥運ËãÄØ£¿inc() ......
ÓÐûÓа취ʵÏÖ¸úQQÓÊÏäÒ»ÑùµÄЧ¹û£¬µã»÷×ó±ßµÄ²Ëµ¥£¬ÓÒ±ßˢУ¬¶à¸öÒ³Ãæ¼äÇл»£¬¶ø×ó±ßµÄ²Ëµ¥À¸²»±ä
Óкܶà¿Ø¼þ¿ÉÒÔʵÏÖ
µÈÄã·Ö¼Ó·Ö£¬ÎÒ¸øÄãд¸öÔ´Âë¡£Õâµã·ÖʵÔÚûÓж¯Á¦»Ø´ð¡£
ExpressBars
¿´¿´¡£
Ò ......
procedure WMNCHitTest(var Msg:TWMNCHitTest); message WM_NCHITTEST;
procedure WMNCPaint(var Msg: TWMNCPaint); message WM_NCPAINT;
ÇëÎÊһϣ¬ÕâÁ½¸öº¯ÊýÊÇÉÏÃæÒâ˼£¬ÔÚÉÏÃæʱºòµ÷Óã¬message WM_NCHITTEST; ......
СµÜµÚÒ»´Î·¢Ìû£¬Çë´ó¼Ò¸øЩÒâ¼û¡£
ÎÒ½ñÄêµÚ¶þ´Î¿¼ÑУ¬¿¼ÉÏÁË¡£»¹ÓÐ4¸öÔ¿ªÑ§£¬ÏÖÔÚÒѾµ½Ñ§Ð£ÁË¡£µ¼Ê¦ÓÐÏîÄ¿£¬ÒªÓÃdelphi.ÎÒÒÔÇ°¶¼Ã»½Ó´¥¹ýDELPHI£¬µ½ÏÖÔÚΪֹ¿´ÁËÁ½¸öÀñ°Ý¡£µ«ÊDz»µÃÒªÁ죬¿´ÊéÉÏһЩ»ù±¾µÄ¶«Î÷¾õ ......