winSocket中如何将Delphi的TDateTime转换成VC++所接收的CTime类型?(50分)

同题

将TDateTime通过计算某两个时间的毫秒数转发出去，然后在VC中转换回来。。。OK拉~

传送就用copymemory()写进buf咯。

//然后在VC中转换回来。。。
转换回来是什么意思?因为服务端的程序我不可以改的,VC自动转换吗?

问题已经解决,多谢yellowyellow参与,分都给你了

function convertDateToCtime(cur_time:double):integer;
var
cur_date: real;
constdate: real;
r_i:integer;
r_v:variant;
begin
constdate:=double(encodedatetime(1970,1,1,1,0,0,0));
cur_date:=double(cur_time);
cur_date:=cur_date-constdate+5/24;
r_v:=cur_date*86400-43200;
r_i:=r_v;
Result:=r_i;
end;

取得整值后,再转存入4位字节,补0够8位就可以了