時間を取得するには (ID:35558)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 ソースを見ればいいのかもしれませんが、テストして見ました。 procedure TForm1.BitBtn2Click(Sender: TObject); var Dt1:TDateTime; begin Dt1 := StrToDateTime(Edit1.text); Edit2.Text:=Format ('%8.15f', [Dt1]); end; Edit1.text Edit2.text 1989/09/17 1:00:00 32768.041666666664200 1989/09/17 1:00:00.01 32768.041666678240300 1989/09/17 1:00:00.02 32768.041666689816300 1989/09/16 0:59:59 32767.041655092591100 1989/09/16 0:59:59.01 32767.041655104167100