请帮忙把c++2次开发接口转为delphi，声明！

以下是二次开发接口(VTCP.H):

#pragma once

//////////
//设置函数操作名vctp_setsockopt(optname)
//////////

#define VTCP_OPTNAME_NONBIO 0//设置非阻塞(BOOL*)
#define VTCP_OPTNAME_PACKET 1//设置包参数(SVTcpOptPacket)
#define VTCP_OPTNAME_KEEPALIVE 2//设置活动检测时间(SVTcpOptKeepAlive)
#define VTCP_OPTNAME_RECV_TIMEO 3//设置接收超时(int*)(ms)
#define VTCP_OPTNAME_SEND_TIMEO 4//设置发送超时(int*)(ms)
#define VTCP_OPTNAME_CONNECT_TIMO 5//设置连接超时(int*)(ms)


//////////
//数据结构
//////////

typedef struct SVTcpOptPacket
{
WORD packet_data_size;//单包最大大小(UDP包的最大大小)(字节)
WORD packet_count;//包缓存数量(UDP包的缓存大小)

}VTCP_OPT_PACKET,*PVTCP_OPT_PACKET;

typedef struct SVTcpOptKeepAlive
{
int keep_alive;//保持活动超时(毫秒)
int keep_alive_interval;//保持活动时间间隔(毫秒)

}VTCP_OPT_KEEPALIVE,*PVTCP_OPT_KEEPALIVE;

typedef struct SVTcpStatCount
{
INT64 tcp_count_real_recv_data_bytes;
INT64 tcp_count_real_recv_data_bytes_micro;
INT64 tcp_count_real_send_data_bytes;
INT64 tcp_count_real_send_data_bytes_micro;

INT64 tcp_count_recv_data;
INT64 tcp_count_recv_data_ack;
INT64 tcp_count_recv_data_drop;
INT64 tcp_count_recv_sync;
INT64 tcp_count_recv_sync_ack;
INT64 tcp_count_send_data;
INT64 tcp_count_send_data_micro;
INT64 tcp_count_s