indy 封包转发
摘要:
type TMySuperMappedPortContext = Class(TIdMappedPortContext) public procedure DoEncode; procedure DoDecode; End;implementation{自定义加密函数}function EncodeData(Src: String): String;begin Result := Src;end;... 阅读全文
posted @ 2009-03-02 14:28 jxgxy 阅读(917) 评论(0) 推荐(0) 编辑