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