delphi½ÓÊÜUDPÊý¾Ý°ü
ËÄܸøÎÒ¸ö¼òµ¥µÄÀý×Ó delphi½ÓÊÜUDPÊý¾Ý°üµÄ Òª½ÓÊÕÊý×éµÄ ×îºÃÊÇÓà IdTCPserver1µÄ ×îºÃ»¹Óз¢Ë͵IJ¿·Ö ±¾È˲ËÄñ£¬Ð»Ð»¸÷λÁË£¡£¡
Â¥ÉϸøµÄÊÇTCPµÄ°É ÎÒÒªUDPµÄ лл£¡£¡ÒýÓà ×îºÃÊÇÓà IdTCPserver1µÄ Õâ²»ÊÇÄãдµÄÂð ¶Ô²»ÆðÎÒд´íÁË ÎÒÒªIdUDPClient1 ²»ºÃÒâ˼ procedure TForm1.Button1Click(Sender: TObject); var a:array[0..1] of char; begin a[0]:='A'; a[1]:='B'; self.IdUDPClient1.SendBuffer('127.0.0.1',1984,a,sizeof(a)); end; лл¥ÉÏ Èç¹ûÎÒÏë½ÓÊÜÊý¾Ýʱºò Ö±½Ó°Ñ½ÓÊÕµ½µÄÊý¾Ý¸³Öµ¸øÊý×é ÒªÔõô×ö£¿ÒýÓà лл¥ÉÏ Èç¹ûÎÒÏë½ÓÊÜÊý¾Ýʱºò Ö±½Ó°Ñ½ÓÊÕµ½µÄÊý¾Ý¸³Öµ¸øÊý×é ÒªÔõô×ö£¿ AData: TStream,Õâ¸ö²ÎÊý£¬Äã¿ÉÒÔÓÃStreamµÄд»º³åÇø·½·¨°ÑÊý¾Ýдµ½Êý×éÖÐÒýÓà ÒýÓà 7 Â¥ lazijiding µÄ»Ø¸´: лл¥ÉÏ Èç¹ûÎÒÏë½ÓÊÜÊý¾Ýʱºò Ö±½Ó°Ñ½ÓÊÕµ½µÄÊý¾Ý¸³Öµ¸øÊý×é ÒªÔõô×ö£¿ AData: TStream,Õâ¸ö²ÎÊý£¬Äã¿ÉÒÔÓÃStreamµÄд»º³åÇø·½·¨°ÑÊý¾Ýдµ½Êý×éÖÐ ²»Ì«¶® д³öÀ´°É лл£¡£¡ procedure TForm1.IdUDPServer1UDPRead(Sender: TObject; AData: TStream; ABinding: TIdSocketHandle); var sStream: TStringStream; a:array[0..1] of char; i:integer; begin &nb
Ïà¹ØÎÊ´ð£º
¾ÍÊÇÒ»¸ö·þÎñ¶ËºÍÒ»¸ö¿Í»§¶Ë£¬Àï±ßÓÐһЩ¹²Óõ¥Ôª £¬ÎÒÔÚ ¹¤³ÌµÄSEARCH PATHÀïÉèÖõÄ·¾¶£¬ Àï±ßÓиö½á¹¹Ì壬ÎÒÔÚ·þÎñ¶Ë´ò¿ª£¬¼ÓÁ˳ÉÔ±£¬µ«ÊÇÎÒÔÚ¿Í»§¶ËÆäËûµ¥Ôª·ÃÎʲ»µ½ÎÒмӵģ¬ÎÒÔÚ¿Í»§¶Ë´ò¿ªÄǸöµ¥Ôª£¬È·Êµ¼ÓÁ ......
hongqi162¡¢windindance ´Ë2È˳¤ÆÚ²»ÔÚÏߣ¬ÌرðÊÇwindindance ¸ü»»ÓÐÄÜÁ¦µÄÈËÉÏ hongqi162»¹ÊǾ³£ÉÏÀ´×ª×ªµÄ ÒýÓà ¸ü»»ÓÐÄÜÁ¦µÄÈËÉÏ ÆäʵҲ²»ÊÇʲôÄÜÁ¦µÄÔÒò£¬Ö÷Òª¿ÉÄÜÊÇʱ¼äÎÊÌâ°É ¹¤×÷µÄ»¹ÒªÉÏ°à£¬Ñ§Ï ......
DelphiÖÐÓÃspcomm·¢ËͺͽÓÊÕÖÐÎÄ¡¢Ó¢ÎĶÌÐŵijÌÐò´úÂë £¬£¬ÄÄλ´óϺÓаï°ïæ СµÜ²»Ê¤¸Ð¼¤......... ×îºÃÊÇÓÃATÖ¸ÁÀ´ÊµÏÖ´®¿ÚͨÐŵģ¡£¡£¡£¡ ÊDz»ÊÇÓÃsim508Ä£¿é°¡ Ë ......
¸÷λºÃ£¡£¡ ¼ÙÉèÎÒÓÐÁ½¸ötextÎļþ Ò»¸öÃû½Ð 1.text ÄÚÈÝ£º I like PC.... ÁíÍâÒ»ÊÇ2.text ÄÚÈÝ: function yk as string endfunction globals endglobals ***********************·Ö½çÏß********** ......