最近学习到delphi自带的Socket网络编程的基础知识,看delphi自带的chat例程,里面有一个出错函数:
procedure TChatForm.ServerSocketError(Sender: TObject; Number: Smallint; var Description: string; Scode: Integer; const Source, HelpFile: string; HelpContext: Integer; var CancelDisplay: Wordbool);
begin
ShowMessage(Description);
end;
请问上面的函数是如何创建的? 在delphi object inspecter 的 EVENTs面板里找不到这个事件,而且本函数里面的参数很多,这个ServerSockerError 事件,在帮助文件里也没找到,不知道delphi是怎么弄出来的? 是不是自定义函数?
procedure TChatForm.ServerSocketError(Sender: TObject; Number: Smallint; var Description: string; Scode: Integer; const Source, HelpFile: string; HelpContext: Integer; var CancelDisplay: Wordbool);
begin
ShowMessage(Description);
end;
请问上面的函数是如何创建的? 在delphi object inspecter 的 EVENTs面板里找不到这个事件,而且本函数里面的参数很多,这个ServerSockerError 事件,在帮助文件里也没找到,不知道delphi是怎么弄出来的? 是不是自定义函数?
