Menghitung durasi jam di delphi

gimana caranya ngitung jumlah jam ? (catatan : perhitungan diusahakan menggunakan query biasa saja)
misal :
jam awal               jam akhir       tanggal         jumlah jam
—————————————————————————
07:00          23:56           21/06/2000      ?
23:00          07:00           22/06/2000      ?

tolong …

kalo variabel jam_akhir dan jam_awal adalah time, maka perhitungannya: jumlah_jam:= jam_akhir – jam_awal.
kalo jumlah_jam mau dibuat format string, tinggal ubah lagi dgn timetostr(jumlah_jam). Kira-kira begitu…
http://www.mail-archive.com/delphi@itb.ac.id/msg02709.html

berformat Date/DateTime, dan gak usah pake tanggal. Jadi buat ngitung jumlah jam/menit/detik ya gampang2 aja:

Jam := Trunc((JamAkhir-JamAwal)*24);
Menit := Trunc((JamAkhir-JamAwal)*24*60);
Detik := Trunc((JamAkhir-JamAwal)*24*60*60);

http://www.mail-archive.com/delphi@itb.ac.id/msg02731.html

https://boutiquesoftware.wordpress.com/2009/02/03/trik-trik-perhitungan-jam-pada-delphi/