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

Delphi¶àÏß³Ìѧϰ£¨5£©£º»¥³âÁ¿Mutex

»¥³âÁ¿ÊÇϵͳÄں˶ÔÏó£¬Ë­ÓµÓоÍË­Ö´ÐС£ËüÓëÁÙ½çÇø¹¤×÷ºÜÀàËÆ¡£²»Í¬´¦ÔÚÓÚ£º1¡¢»¥³âÁ¿¿ÉÒÔ¿ç½ø³Ì±ß½çͬ²½Ï̡߳£2¡¢¿ÉÒÔ¸ø»¥³âÁ¿È¡¸öÃû×Ö£¬Í¨¹ýÒýÓû¥³âÁ¿µÄÃû×ÖÀ´Ê¹ÓÃÒ»¸öÒÑÖªµÄ»¥³âÁ¿¶ÔÏó¡£
     ʹÓû¥³âÁ¿Ö®ÀàµÄ¶ÔÏóÐèÒª·´¸´µ÷ÓÃϵͳÄںˣ¬ÆÚ¼äÐèÒª½øÐнø³ÌÉÏÏÂÎÄת»»ºÍ¿ØÖƼ¶±ðת»»£¬´ó¸ÅÐèÒªºÄ·Ñ400µ½600¸öʱ¼äÖÜÆÚ¡£
      ÓÖÊÇͼÊé¹ÝµÄ±ÈÓ÷£¬ÏÖÔÚÊǸãÒ»¸öËø£¬°ÑÔ¿³×£¨»¥³âÁ¿¾ä±ú£©½»¸ø¹ÜÀíÔ±£¨²Ù×÷ϵͳ£©£¬Ã¿Ò»¸öÈË£¨Ị̈߳©ÏëÒª½èÊéµÄʱºò£¬¶¼ÒªÏò¹ÜÀíÔ±ÄÃÔ¿³×¡£µ±ÓÐÈËÔÚʹÓõÄʱºò£¬ÁíÒ»È˱ØÐëµÈ´ý£¬µÈµ½Ô¿³×ÓпյÄʱºò£¨»¥³âÁ¿½øÈëÐźÅ״̬£©£¬²ÅÄÜÄõ½Ô¿³×£¨ÓµÓÐÁ˾ä±ú£©°ìÀí½èÊéÒµÎñ£¨´Ëʱ»¥³âÁ¿½øÈë·ÇÐźÅ״ֱ̬µ½°ìÍêÒµÎñ£©¡£
   ʹÓû¥³âÁ¿µÄ²½Ö裺
1¡¢ÉùÃ÷Ò»¸öÈ«¾ÖµÄ»¥³âÁ¿¾ä±ú±äÁ¿£¨var hMutex: THandle;£©£»
2¡¢´´½¨»¥³âÁ¿£ºCreateMutex(
                          lpMutexAttributes: PSecurityAttributes;
                          bInitialOwner: BOOL; 
                          lpName: PWideChar   ): THandle;
  £¨lpMutexAttributes²ÎÊý£ºÖ¸ÏòTSecurityAttributesµÄÖ¸Õ룬°²È«ÊôÐÔ£¬Ò»°ãÓÃȱʡ°²È«ÊôÐÔnil£»
    bInitialOwer²ÎÊý£º±íʾ´´½¨µÄ»¥³âÁ¿Ïß³ÌÊÇ·ñÊÇ»¥³âÁ¿µÄÊôÖ÷£¬Èç¹û¸Ã²ÎÊýΪFalse»¥³âÁ¿¾ÍûÊôÖ÷£¬Ò»°ãÀ´½²Ó¦ÉèΪFalse£¬·ñÔòÈç¹ûÉèΪTrueµÄ»°£¬Òªµ±Ö÷Ï߳̽áÊøÆäËûÏ̲߳ųÉΪËüµÄÊôÖ÷²ÅÄÜÔËÐУ»
   lpName²ÎÊý£ºÊÇ»¥³âÁ¿µÄÃû×Ö£¬Èô´òËãÈ¡ÃûµÄ»°£¬Ôò´«Èënil¡££©
3¡¢Óõȴýº¯Êý¿ØÖÆÏ߳̽øÈëͬ²½´úÂë¿é£ºWaitForSingleObject(
                                       &n


Ïà¹ØÎĵµ£º

SDL & Object Pascal (Delphi) [ǰÑÔ]

ʵ¼ÊÉÏÕâ¸öÃû×Ö½Ð[SDL & Delphi]Ò²²»³ÉÎÊÌ⣬ ÒòΪ³ýÁËDelphiËÆºõҲûÓÐÄĸöÁ÷ÐеĿª·¢¹¤¾ßÓõÄÊÇPascalÓïÑÔ¡£
SDLÆäʵÎÒҲֻѧÁ˲»µ½Á½ÐÇÆÚ¶øÒÑ¡£¸Õ¿ªÊ¼ÎÒÏëÊÔͼÓÃVC£¬ÒòΪÕâÑù×ÊÁÏ×îÈ«£¬Ò²ºÜºÃÕÒ£¬µ«Ì«¾ÃûÓÃVCÏÖÔÚ¿´CµÄ´úÂëÓеãÀ§ÄÑ£¨->Õâ¸öËã·ûÊǸÉÂðµÄÀ´×Å……£©¡£Æäʵ×÷Ϊһ¸öרҵ²»ÊǼÆËã»úµÄÈË ......

Delphi Êý×éºÍ½á¹¹Ìå

¼¼Êõ½»Á÷,DH½²½â. ¼ÇµÃºÜÔç֮ǰÎÒ¾Í˵¹ý,Êý×éºÍ½á¹¹ÌåÔÚÄÚ´æÖÐÆäʵһÑùµÄ,ËûÃǶ¼ÊÇÁ¬Ðø·Ö²¼µÄ.
ÀýÈç: TMyStruct = record
A,B,C:Integer;
end;
T3IntArray = array[0..2]of Integer;
ÕâÁ½¸ö¶¼Õ¼12×Ö½Ú,¶øÇÒTMyStruct.A¾ÍÊÇT3IntArray[0].

¶øÎÒÃÇÖªµÀÔÚ·ÃÎÊÊý×éÖÐij¸öÔªËØµÄʱºò,Ö»ÊÇÔÚµ ......

ÓÃSPCOMM ÔÚ DelphiÖÐʵÏÖ´®¿ÚͨѶ

ÓÃDelphi ʵÏÖ´®¿ÚͨѶ£¬³£Óõļ¸ÖÖ·½·¨Îª£ºÊ¹ÓÿؼþÈçMSCOMMºÍSPCOMM£¬Ê¹ÓÃAPIº¯Êý»òÕßÔÚDelphi Öе÷ÓÃÆäËü´®¿ÚͨѶ³ÌÐò¡£ÀûÓÃAPI±àд´®¿ÚͨÐųÌÐò½ÏΪ¸´ÔÓ£¬ÐèÒªÕÆÎÕ´óÁ¿Í¨ÐÅ֪ʶ£¬ÆäÓŵãÊÇ¿ÉʵÏֵŦÄܸüÇ¿´ó£¬Ó¦ÓÃÃæ¸ü¹ã·º£¬¸üÊʺÏÓÚ±àд½ÏΪ¸´ÔÓ µÄµÍ²ã´ÎͨÐųÌÐò¡£Ïà±È½Ï¶øÑÔ£¬ÀûÓÃSPComm¿Ø¼þÔòÏà¶Ô½Ï¼òµ¥£¬¸Ã¿Ø¼þ¾ßÓ ......

delphiÖ¸Õë¼òµ¥ÈëÃÅ:


    
 Ö¸ÕëÓ÷¨µÄÀý×Ó£º  
  1         var  
  2             X,   Y:   Integer;       //   X   and   Y   ÕûÊýÀàÐÍ  
  3       &n ......

¹ØÓÚ Delphi TThread

TThreadÊÇÒ»¸ö³éÏóÀà,ÓÃÓÚÔÚdelphiÖд´½¨Ï̡߳£
´´½¨Ò»¸öTThreadµÄ×ÓÀà¶ÔÏó¼´Ï൱ÓÚ´´½¨Ò»¸öÏ̡߳£¡¡¡¡
µ±Ò»¸öÓ¦ÓóÌÐòÔËÐÐʱ£¬Ó¦ÓóÌÐò¾Í±»ÔØÈëÄÚ´æ×¼±¸Ö´ÐС£´Ëʱ£¬Ëü³ÉΪ°üº¬Ò»¸ö»ò¶à¸öÏ̵߳Ľø³Ì¡£Ïß³ÌÖ´ÐÐÓ¦ÓóÌÐòµÄ²¿·ÖÄÚÈÝ£¬²¢ÓɲÙ×÷ϵͳ·ÖÅäCPUʱ¼ä¡£Í¬Ò»½ø³ÌµÄËùÓÐÏ̹߳²ÏíͬһµØÖ·¿Õ¼ä£¬¿ÉÒÔ·ÃÎʽø³ÌµÄÈ«¾Ö±äÁ¿ ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ