请问：ServerSocket1clienterror前面应该怎么申明？(5分)

procedure ServerSocket1clienterror(Sender: TObject; Socket: TCustomWinSocket);



procedure Tchat.ServerSocket1clienterror(Sender: TObject;
Socket: TCustomWinSocket;errorevent:terrorevent;
var errorcode:integer);
begin
showmessage(description);
end;

结果提示:<ServerSocket1clienterror>的说明与先前的说明不同

是不一样啊，是你自己修改的吧，用默认的就好。

默认的如何添加啊？