名前
題名
▼ Syakeさん > ▼ Mr.XRAYさん > > > DateUtilsのHourBetWeenでしたっ > HoursBetween でしたね。 > しかし、まあ、なんと言うか、しっくりこないような・・・ > > DateUtilsは重宝します。 > > procedure TForm1.Button1Click(Sender: TObject); > > var > > STime,ETime :TTime; > > SH :Word; > > A : Double; > > begin > > STime := StrToTime('8:00'); > > ETime := StrToTime('21:00'); > > A:=DaySpan(STime,ETime); > > SH:=HourOf(A); > > end; > は、良いようですね。 > でも、HoursBetweenも、たまたま「あれっ！？」て事がわかったので > ちょっと心配(^_^;)。 > まあ、その時はその時で・・・
GIF,JPEG,PNG画像ファイル及びLZH,ZIPファイルをアップロードできます.
600 x 1200 ピクセルを超える画像は縮小表示されます(画像クリックで拡大表示).
(上限122000(120k)バイト)

削除キー Link