比如如下代码:
var socket_t:array[1..100] of Tclientsocket;procedure Tfrmsetnet.Button1Click(Sender: TObject);
begin
socket_t[i]:=Tclientsocket.Create(nil);
socket_t[i].Address:=MaskEdit1.Text;
socket_t[i].Port:=strtoint(Edit1.text);
socket_t[i].Active:=true;
end;
动态创建了一个Tclientsocket的对象,该如何编写其onread事件处理过程?是否要声明?