delphi写的HOOK示例。通过APIHOOK动态修改SOCKS传输数据包。