delphi7代码：unitUnit1;interfaceusesWindows,Messages,SysUtils,Variants,Classes,Graphics,Controls,Forms,Dialogs,StdCtrls,ExtCtrls,OverbyteIcsWndControl,OverbyteIcsWSocket,OverbyteIcsWSocketS;typeTForm1=class(TForm)WSocketServer1:TWSock