高分请教一个关于时间类型转换的简单问题！

我用VC编了一个动态链接库供一个Delphi程序调用，在动态库中需要输入一个关于时间的变量，在VC中这个变量是long型的，在VC中很容易将时间型（CTime）变量转换成long型，但我不知道如何在Delphi中实现这一目的。
   欢迎大家予以解答。谢谢！

解决方案 »

  1.   

    var
      i:int64;
    begin
    i:=Trunc(Date);
    ShowMessage(IntToStr(i));
    end;
      

  2.   

    在Delphi中时间类型是一个Double类型
      

  3.   

    输入 10:10:00 这样形式的字符串，用StrToDateTime()函数可转换成TDateTime(即Double)型时间值
      

  4.   

    综上所述，delphi的时间是浮点型的，小数后面是小于秒的时间，如1234566665.123456
    其中123456是小于秒的时间。其实你可以用DecodeDate函数实现年月日的分离，再用Encodedate整合成时间。
      

  5.   

    是从Delphi转到VC。Delphi我不是很熟悉，我只是使用VC编制了一个DLL给一个用户使用，这里面必须使用一个Long型的时间变量。我不知到delphi的这个double型的时间跟VC的long型时间是否一致。比如2003/3/8 22:34:10转换成long型的值是1047134011。
      

  6.   

    是的，DELPHI中，时间可以与DOUBLE一样用。
      

  7.   

    delphi里使用double来表示，1=1天，其他的你推算一下。