本示例使用设备介绍： unitUnit1; interface uses Windows,Messages,SysUtils,Variants,Classes,Graphics,Controls,Forms, Dialogs,ComCtrls,ScktComp,StdCtrls,ScktComp7,ExtCtrls,Clipbrd; type TForm1=class(TForm) ServerSocket1:TServerSocket; Button1:TButton; Button2:TButton; Edit1:TEdit; Edit2:TEdit; Label1:TLabe...