下边易语言回调函数如何转成TC ？？？？

jushunhe

.子程序 _Monitor_WndCallBack, 整数型, , TKMONITOR,Monitor:**
.参数 hWnd, 整数型
.参数 uMsg, 整数型
.参数 wParam, 整数型
.参数 lParam, 整数型
.局部变量 dwRet, 整数型
.局部变量 lpCopy, COPYDATASTRUCT
.局部变量 sByte, 字节集
.局部变量 Str, 文本型

.判断开始 (uMsg ＝ 74)  ' 74 (#4a) 当一个应用程序传递数据给另一个应用程序时发送此消息
    sByte ＝ 指针到字节集 (lParam, 1024)
    lpCopy.dwData ＝ 取字节集数据 (sByte, #整数型, 1)
    lpCopy.cbData ＝ 取字节集数据 (sByte, #整数型, 5)
    lpCopy.lpData ＝ 取字节集数据 (sByte, #整数型, 9)
    Str ＝ 指针到文本 (lpCopy.lpData)
    Str ＝ 取文本左边 (Str, lpCopy.cbData)
    _AddLog1 (wParam, Str)
    dwRet ＝ 0
.默认
    dwRet ＝ _CallWindowProc (OldProc, hWnd, uMsg, wParam, lParam)  ' 是将消息信息传送给指定的窗口过程的函数  hWnd:当前的程序窗口句柄
.判断结束
返回 (dwRet)
//-----------------------------------------------//
.数据类型 COPYDATASTRUCT
    .成员 dwData, 整数型
    .成员 cbData, 整数型
    .成员 lpData, 整数型