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

DelphiÈý²ã ѹËõÊý¾Ý´«Êä

Client:TSocketConnection ºÍServer: Scktsrvr¹ØÏµ----ѹËõÊý¾Ý´«Êä
Ò»Ö±ÓÃSocketConnectionºÍ·þÎñ¶ËµÄ´«ÊäÊý¾ÝÔÚÈý²ãÊý¾Ý¿âÖУ¬´ÓÀ´Ã»ÓÐ×¢Òâµ½ËüÃÇÖ®¼äµÄÊý¾Ý´«Ê䣬ֻÊÇÏë×Å£¬¹ÜËüÁË£¬ÍøÂçµÄÊ£¬Ç°¶Îʱ¼äÔÚDelphiÖеÄDemosÖз¢ÏÖDemos\Midas\Intrcpt.dprÀý×Ó£¬ºÇºÇ£¬ÔÙ¿´Á˰ëÌìµÄVCL·¢ÏÖ¿ÉÒÔ½«Client¶Ë·¢Ë͵ĸøServerµÄÊý¾Ý£¬ºÍServer·¢Ë͸øClientµÄÊý¾ÝÊÇ¿ÉÒÔ½øÐÐѹËõµÄ¡£ºÇºÇ£¬²»¸Ò²ØË½£¬Share¸ø´ó¼Ò¡£
1:
×¼±¸¹¤×÷,ÏÈdelphi¹âÅÌÖеÄ\info\extras\zlib\zlib.pas½øÐбàÒȻºócopy µ½lib·¾¶ÖУ¬ÒòΪҪѹËõÊý¾Ý£¬±ØÐëÒªÓÐѹËõ¹¦ÄÜ£¬Õâ¸ödelphiÒѾ­×Ô´ø£¬ËüÊÇ»ùÓÚÁ÷µÄ·½Ê½¶Ô½Ó¿ÚIDataBlock(TDataBlockʵÏÖ£¬Æäʵ¾ÍÊǶÔTMemoryStreamµÄ²Ù×÷)Êý¾Ý½øÐÐѹËõºÍ½âѹµÄ¡£×öÁËÕâ¸öºó£¬²ÅÄܽøÐÐÏÂÃæµÄ¹¤×÷¡£
2:
Open \Demos\Midas\Intrcpt\Intrcpt.dpr
complier....(ÈçûÓÐ×öµÚÒ»²½£¬ºÙºÙ...)
Éú³ÉIntrcpt.dll
½«Intrcpt.dll copy to System directory,»òÕßÄãµÄ³ÌÐòÏÂÃæ¡£
×¢²áËü£ºregsrvr32 Intrcpt.dll (Ϊʲô£¬Õâ¸öÂï...)
¼ÇסIntrcpt.dprµÄÄǸöGUID,ÄãÒ²¿ÉÒÔ×Ô¼ºÖØÐÂÉú³ÉÒ»¸ö(°´Shift+Ctrl+G)
3:
Server:
Open scktsrvr.exe£¬ÏàП÷λ¶¼ºÜÊìϤÄǽçÃæ£¬¶Ë¿Ú(TListbox)£¬Thread Cache Size(TEdit), GUID(TEdit),ºÃ£¬ÎÒÃÇÒª×öµÄÊ£¬¾ÍÊǽ«×¢²áµÄIntrcpt.dllÄǸöGUIDÌîµ½Õâ¸öGUID(TEdit)¿ò¿òÖУ¬
Ö»ÐèÌî×Ô¼º³ÌÐòµÄµÄÄǸö¶Ë¿ÚµÄGUID°¡£¬±ðÂÒÌÈç¹ûÓбðÈËÓÃÕâ¸ö³ÌÐò£¬³öÁËʲô£¬±ðÕÒÎÒ¡£OK,Apply.
Client:
ÄãдµÄ³ÌÐòÖп϶¨ÓÐTSocketConnection,ËüÓиöÊôÐÔInterceptGUID: string;ºÃÁË£¬½«Intrcpt.dllµÄGUIDÌîÉÏÈ¥£¬ËüÊǸúServerÖеÄÒ»ÑùµÄ¡£OK.»¹ÓбðÍüÁË£¬Regsrvr32 intrcpt.dll ÔÚÄãµÄ¿Í»§¶Ë¡£²»È»£¬³ÌÐòËä²»»áraise,µ«ÊÇServer´«¹ýÀ´µÄÊý¾ÝÊÇѹËõµÄ....
ºÃÁË£¬ºÇºÇ¡£¾ÍÕâЩÁË¡£3²½Ö裬ºÜÇå³þ°É(²»»á°É£¬»¹²»¶®£¬µ¹)
Ô­Àí
scktsrvr.exeÆäʵÊÇÒ»¶ÑTServerSocket,Ò»¸ö¶Ë¿Ú´ú±íÁËÒ»¸öTServerSocket,ÿ¸öTServerSocketÊÇ»ùÓÚ¶àÏ̷߳½Ê½Óë¿Í»§¶Ë½øÐÐÊý¾Ý½»»»¡£ËüдÁ˸öTServerClientThread(ÔÚ·þÎñ¶ËÖеĿͻ§¶Ë)µÄÀ©Õ¹
,¶à¼ÓÁ˶Կͻ§¶ËÊý¾Ý½ÓÊյĹÜÀí½âÎö£¬»¹ÓÐActivityDateTime,GUID£¬Ò»°ã²»¹ÜËü¡£µ«ÊÇÎÒÃÇÓõ½µÄѹËõÖ»ÊǸúÕâ¸öGUIDÓйأ¬ÆäËü·Ñ»°ÉÙ˵¡£
Server½ÓÊÜÒ»¸öClientÁ¬½Ó,Ôò¼ÓÒ»¸öTServerClientThreadµ½±¾µØÖУ¬ÓÃÀ´¼à¿ØClient Read ºÍCloseʼþ£¬ËùÒÔServerÖеÄscktsrvrÖÐÎÒÃÇÖ»ÒªÁ˽âÁËTServerClientThre


Ïà¹ØÎĵµ£º

DELPHIÓû§µÇ¼·½°¸

3.2  Óû§µÇ¼·½°¸
ÔÚ½øÈëÒ»¸öϵͳʱ£¬±ØÐëÏÈÔڵǼ´°ÌåÖÐÊäÈëÕýÈ·µÄÓû§ÃûºÍÃÜÂë²ÅÄܽøÈë¡£ÕâÑù¿ÉÒÔÈ·±£ÏµÍ³µÄ°²È«ÐԺͱ£ÃÜÐÔ£¬µÇ¼´°ÌåµÄÖÆ×÷°´ÕÕϵͳµÄ´óС¼°Óô¦£¬¿ÉÒÔ·ÖΪ²»Í¬µÄµÇ¼´°ÌåÑùʽ£¬ÔÚϵͳµÚÒ»´ÎµÇ¼ǰ£¬Ê×ÏÈÒª¶Ô²Ù×÷Ô±ÐÅÏ¢½øÐÐÏàÓ¦µÄÉèÖᣱ¾½Ú½«¶ÔµÇ¼´°Ìå¼°²Ù×÷Ô±¹ÜÀí´°ÌåµÄÖÆ×÷¹ý³Ì½øÐÐÏêϸµÄ˵Ã÷ ......

DELPHIÓû§µÇ¼·½°¸

3.2  Óû§µÇ¼·½°¸
ÔÚ½øÈëÒ»¸öϵͳʱ£¬±ØÐëÏÈÔڵǼ´°ÌåÖÐÊäÈëÕýÈ·µÄÓû§ÃûºÍÃÜÂë²ÅÄܽøÈë¡£ÕâÑù¿ÉÒÔÈ·±£ÏµÍ³µÄ°²È«ÐԺͱ£ÃÜÐÔ£¬µÇ¼´°ÌåµÄÖÆ×÷°´ÕÕϵͳµÄ´óС¼°Óô¦£¬¿ÉÒÔ·ÖΪ²»Í¬µÄµÇ¼´°ÌåÑùʽ£¬ÔÚϵͳµÚÒ»´ÎµÇ¼ǰ£¬Ê×ÏÈÒª¶Ô²Ù×÷Ô±ÐÅÏ¢½øÐÐÏàÓ¦µÄÉèÖᣱ¾½Ú½«¶ÔµÇ¼´°Ìå¼°²Ù×÷Ô±¹ÜÀí´°ÌåµÄÖÆ×÷¹ý³Ì½øÐÐÏêϸµÄ˵Ã÷ ......

Delphi²Ù×÷INIÎļþµÄÒ»°ã²½Öè

Delphi²Ù×÷INIÎļþ²½ÖèÈçÏ£º
-------------------------------------
1£©ÔÚUsesÖÐÌí¼ÓiniFileµ¥Ôª£»
2£©ÉùÃ÷TiniFile¶ÔÏó£»
3£©´´½¨TiniFile¶ÔÏó£»
----------------try------------------
4£©INIÎļþ¶Áд²Ù×÷£»
--------------finally----------------
5£©ÊÍ·ÅTiniFile¶ÔÏó£»
---------------end--------------- ......

ÔÚDelphiÓ¦ÓóÌÐòÖÐʹÓÃDLL

ÔÚDelphiÓ¦ÓóÌÐòÖÐʹÓÃDLL
¡¡¡¡Delphi²»½ö¿Éµ÷ÓÃC£«£«²úÉúµÄDLLÄ£¿é£¬Í¬ÑùC£«£«³ÌÐòÒ²¿Éµ÷ÓÃDelphiËù²úÉúµÄDLL²¿¼þ¡£ÕâÑù½»»¥µ÷Óã¬ÎÞÐëÖØ¸´¿ª·¢£¬´ó´óËõ¶ÌÁËÉú²úÖÜÆÚ¡£ 
¡¡¡¡DelphiÓëVisualBasic¡¢VisualFoxProµÈÈí¼þÒ»Ñù£¬ÊôÓÚRAD¹¤¾ß£¨¿ìËÙÓ¦Óÿª·¢¹¤¾ß£©¡£ÊʺϿª·¢32λ»ò16λ£¯32λ»ìºÏÓ¦ÓóÌÐò¡£DelphiËùÊ¹Ó ......

DelphiÖж¯Ì¬Á´½Ó¿â(DLL)µÄ½¨Á¢ºÍʹÓÃ

¶¯Ì¬Á´½Ó¿âÊÇÒ»¸öÄܹ»±»Ó¦ÓóÌÐòºÍÆäËüµÄDLLµ÷ÓõĹý³ÌºÍº¯ÊýµÄ¼¯ºÏÌå,ËüÀïÃæ°üº¬µÄÊǹ«¹²´úÂë»ò×ÊÔ´¡£ÓÉÓÚDLL´úÂëʹÓÃÁËÄÚ´æ¹²Ïí¼¼Êõ,ÔÚijЩµØ·½windowsÒ²¸øÁËDLLһЩ¸ü¸ßµÄȨÏÞ,Òò¶øDLLÖпÉÒÔʵÏÖһЩһ°ã³ÌÐòËù²»ÄÜʵÏֵŦÄÜ,ÈçʵÏÖwindowsµÄHOOK¡¢ISAPIµÈ¡£Í¬Ê±,DLL»¹Îª²»Í¬ÓïÑÔ¼ä´úÂë¹²ÏíÌṩÁËÒ»Ìõ·½±ãµÄ;¾¶¡£Òò¶øD ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ