之前用C語言Time函式的數據是16進位的String 是否有Delphi的函式讀取或要如何轉換... 麻煩各位高手解惑...謝謝...

Take a look at the functions: Time, Now, Date, FormatDateTime, DateTimeToStr, TimeToStr, DateToStr, etc. 

這些函數都查過了... TDateTime是Double Type所使用的方法是小數點之前是日期，之後是時間，而C的Time函數是Longword的方式做的，從格林威治1970年1月1日00:00:00以秒計算，是否只能土法煉鋼自行轉換，而無法直接使用函數轉換？< >< > 還有一個問題，讀到一組String是'3E0193FF'，要如何轉換為Double Type？謝謝！

引言: 這些函數都查過了... TDateTime是Double Type所使用的方法是小數點之前是日期，之後是時間，而C的Time函數是Longword的方式做的，從格林威治1970年1月1日00:00:00以秒計算，是否只能土法煉鋼自行轉換，而無法直接使用函數轉換？< >< > 還有一個問題，讀到一組String是'3E0193FF'，要如何轉換為Double Type？謝謝！< face="Verdana, Arial, Helvetica"> Oh~~~ so you're using time_t record type? I think '3E0193FF' should be converted to a longint 1040290815? I am sorry there is no built-in function to convert a hex number to dec and you probably need to write it yourself. BTW, using this kind of time representation... could it be the year 2048 problem (similar to y2k but 2048 for this time_t record in some C compilers)? For example, to add some second 1000 seconds to datetime variable ADateTime: ADateTime := ADateTime EncodeTime(1000 div 3600, 1000 div 60, 1000 mod 60,0);

I am sorry the problem is not year 2048, should be year 2038  href="http://pw1.netcom.com/~rogermw/Y2038.html">http://pw1.netcom.com/~rogermw/Y2038.html

你的意思是不是說從格林威治1970年1月1日00:00:00到目前的時間共幾秒的問題呢?! 以前在Linux上面用C寫程式有遇過這樣的東西,時間格式是一個長整數的東西, 在Delphi其實也有類似的函式可用. uses DateUtils; DateTimeToUnix(TDateTime) : int64; UnixToDateTime(Value :int64):TDateTime; 不知道你要的是不是這個......

GeminiLin兄您好: 1.目前小弟還沒找到函式, 但這可能要先用土法煉鋼的方法做    2.要注意Integer的最大值到多少, 下面的值測試無誤   Integer值最大到十進位的2147483647 十六進位的$7FFFFFFF

procedure TForm1.Button1Click(Sender: TObject);
begin
   ShowMessage(IntToHex(1040290815,8));
   ShowMessage(IntToStr(StrToInt('$3E0193FF')));
end;

我不是高手, 高手是正在銀幕前微笑的人.

------


我不是高手, 高手是正在銀幕前微笑的人.

謝謝大家全力相助 測試過後成功了... procedure TForm1.Button1Click(Sender: TObject); begin   Label2.Caption:=DateTimeToStr(UnixToDateTime(StrToInt('$3E0193FF'))); end; 謝謝大家！！< >< >