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

Delphi¶àÏß³Ìѧϰ£¨7£©£ºÊ¼þEvent

EventʼþÓ÷¨ÓëMutex²î²»¶à£¬µ«Ëü¿ÉÒÔʹÓãºSetEvent£¨Æô¶¯ÔËÐУ©ResetEvent£¨ÔÝÍ£ÔËÐУ©¡¢PulseEvent£¨Ö´ÐÐÒ»´ÎºóÁ¢¼´ÔÝÍ££©¡£
       ÏÈ¿´Ò»Ï´´½¨º¯Êý£ºCreateEvent(
                                       lpEventAttributes: PSecurityAttributes;
                                       bManualReset: BOOL;    
                                       bInitialState: BOOL; 
                                       lpName: PWideChar ): THandle; stdcall;
£¨lpEventAttributes²ÎÊý£¬Ö¸ÏòTSecurityAttributes¼Ç¼µÄÖ¸Õ룬һ°ã¿ÉÒÔȱʡÌîÈënilÖµ£»
   bManualReset²ÎÊý£¬ÊÇ·ñ¿ÉÊÖ¶¯ÔÝÍ££¬TrueΪ¿ÉÊÖ¶¯£¬FalseΪʼþ¶ÔÏó¿ØÖÆÒ»´Îºó½«Á¢¼´ÔÝÍ££»
   bInitialState²ÎÊý£¬³õʼ״̬£¬TrueΪʼþ¶ÔÏó´´½¨ºó´¦¿ÉÔËÐÐ״̬£¬FalseΪÔÝͣ״̬£»
   lpName²ÎÊý£¬Ê¼þµÄÃû³Æ£»
   ·µ»ØÖµÎª¾ä±ú¡££©
Àý×Ó´úÂ룺
{Ö÷´°Ìå´úÂë}
unit Unit2;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;

type
TForm2 = class(TForm)
Button1: TButton;
Label1: TLabel;
Label2: TLabel;
Label3: TLabel;
Label4: TLabel;
Label5: TLabel;
btnSetEvent: TButton;
btnResetEvent: TButton;


Ïà¹ØÎĵµ£º

DelphiÖÐʹÓÃ@È¡º¯ÊýµØÖ·µÄÎÊÌâ

ÀýÈçÒÔÏ´úÂ룺
unit Unit1;
interface
uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,Dialogs;
type
  TForm1 = class(TForm)
    procedure one();
    function two(x,y:integer):integer;
  private
    ......

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

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

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

¹ØÓÚ Delphi TThread

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

Delphi¶àÏß³Ìѧϰ£¨3£©£ºÏß³Ìͬ²½µÄÔ­Òò

ÔÚʹÓöàÏ̵߳Äʱºò£¬Èç¹û¶àÏ̶߳Ôij¸öÌØ¶¨µÄ¹«¹²Êý¾Ý»ò×ÊÔ´½øÐзÃÎÊ£¬ÐèÒª¶Ô¶àÏ߳̽øÐÐЭµ÷²Ù×÷£¬½Ð×öÏß³Ìͬ²½¡£
     ÀýÈ磺Èý¸öÏ̷ֱ߳ðÑ­»·µØÏòListBoxÖÐдÈëÊý¾Ý¡£Ã»ÓнøÐÐͬ²½Ê±£¬Ð´ÈëµÄ˳ÐòÊDz»È·¶¨µÄ¡£
{Ö÷´°Ìå´úÂë}
unit Unit2;

interface

uses
Windows, Messages, SysUtils, V ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ