DelphiÖÐÓÃADOÁ¬½ÓÊý¾Ý¿â
´ËÎÄÊʺÏDelphiÐÂÊÖÔĶÁ£¬ÌرðÊÇÁ¬½ÓÊý¾Ý¿â·½Ã滹һ¶®°ë¶®ÉõÖÁ¸ù±¾²»¶®µÄÐÂÊÖ£»
--------------------------µ«×ÜÌåÏÔµÃÓеãÂÒ-------------------------
±¾ÎÄÕÂÒÔDelphi 7ºÍSQL Server 2000ΪÀý£¬¿Ø¼þÃû¾ùΪϵͳĬÈÏ£¬ÈçUnit1,DataModule1,Edit1,ADOCommand1,ADODataSet1,ADOConnection1,DataSource1µÈµÈ¡£
³õ³õ½Ó´¥Delphiʱ£¬ÏëÒªÁ¬½ÓÊý¾Ý¿â£¬µ«Ãæ¶ÔÒ»´ó¶ÑÊý¾Ý¿âÀà¿Ø¼þ£¬ÎÞËùÊÊ´Ó£¬¼È²»Öª¸ÃÓÃÄĸö/Щ¿Ø¼þ£¬Ò²²»Öª¾ßÌåÔõôÁ¬½ÓÊý¾Ý¿â£¡
¾¹ýÒ»¶Îʱ¼äµÄ“ÃþÅÀ¹ö´ò”£¬ËãÊdzõ²½ÃþË÷µ½Á˳£ÓõÄÁ¬½Ó·½·¨¡£ÆäʵÖ÷ÒªÊÇÓÃADOÁ¬½Ó£¬¶øADOÒ²ÊÇ×î³£ÓõÄÁ¬½Ó¼¼ÊõÖ®Ò»¡£
ÒÔϼ¸¸ö¿Ø¼þÔÚÁ¬½ÓÊý¾Ý¿âʱÊÇÓõñȽ϶àµÄ£¬²¢ÇÒͨ³£µÄµÄÁ¬½Ó¼Ü¹¹ÊÇ
————————————————————
Êý¾Ý¿â
↑
ADOConnection
↑ ↑
ADOCommand ADODataSet
↑
DataSource
↑
DBGrid
————————————————————
»òÕß
————————————————————
 
Ïà¹ØÎĵµ£º
Ï̵߳Ļù´¡ÖªÊ¶
Ï̵߳Ä×é³É¡£Ïß³ÌÓÐÁ½²¿·Ö×é³É¡£
1¡¢Ò»¸öÊÇÏ̵߳ÄÄں˶ÔÏ󣬲Ù×÷ϵͳÓÃËüÀ´¶ÔÏß³Ìʵʩ¹ÜÀí¡£Äں˶ÔÏóÒ²ÊÇϵͳÓÃÀ´´æ·ÅÏß³Ìͳ¼ÆÐÅÏ¢µÄµØ·½¡£
2¡¢ÁíÒ»¸öÊÇÏ̶߳ÑÕ»£¬ËüÓÃÓÚά»¤Ïß³ÌÔÚÖ´ÐдúÂëʱÐèÒªµÄËùÓк¯Êý²ÎÊýºÍ¾Ö² ......
ÎÒÃÇÄÜ¿´µ½ÒÔÏ´úÂë
var pSource,pDest:PChar;
len: integer;
.......................//һЩ´úÂë
Move(pSource,pDest,len); //´íÎó
Move(pSource^,pDest^,len); //ÕýÈ·
¿´ÆðÀ´È·ÊµºÃÏñÊÇ´«Öµ£¬¶ø²»ÊÇ´«µØÖ·£¬µ«ÊǸ÷λ±ðÍüÁË£¬Õâ²»ÊÇC£¬C++£¬¶øÊÇDelphi
Object Pascal,ËùÒÔ£¬¾ø²»ÄÜ´Óº¯Êýµ ......
»ñÈ¡post£¬»òÕßget·µ»ØµÄcookie£¬³ýÁ˹ýÂË·µ»ØµÄ×Ö·û´®Ö®Í⣬×î¼òµ¥µÄ·½·¨ÊÇʹÓÃidhttpµÄCookieManagerÊôÐÔ
±ÈÈç»ñµÃIDhttp·µ»ØµÄÈ«²¿Cookie
if idhttp1.CookieManager.CookieCollection.Count > 0 then
for i := 0 to idhttp1.CookieManager.CookieCollection.Count - 1 do
temp := temp + idhttp1.Cooki ......
Client:TSocketConnection ºÍServer: Scktsrvr¹Øϵ----ѹËõÊý¾Ý´«Êä
Ò»Ö±ÓÃSocketConnectionºÍ·þÎñ¶ËµÄ´«ÊäÊý¾ÝÔÚÈý²ãÊý¾Ý¿âÖУ¬´ÓÀ´Ã»ÓÐ×¢Òâµ½ËüÃÇÖ®¼äµÄÊý¾Ý´«Ê䣬ֻÊÇÏë×Å£¬¹ÜËüÁË£¬ÍøÂçµÄÊ£¬Ç°¶Îʱ¼äÔÚDelphiÖеÄDemosÖз¢ÏÖDemos\Midas\Intrcpt.dprÀý×Ó£¬ºÇºÇ£¬ÔÙ¿´ÁË°ëÌìµÄVCL·¢ÏÖ¿ÉÒÔ½«Client¶Ë·¢Ë͵ĸøServerµÄÊ ......
// ÅжÏÊÇ·ñÊÇÊýÖµÐÍ By yangxiao 2007.7.21
function isNumeric(strText: WideString): Boolean;
var
s: string;
i, l, p: Integer;
begin
Result := False;
l := Length(strText);
if l = 0 then Exit;
s := '';
for i:=1 to l do
......