Delphi short time sorunu

[pisiko_212]

Merhabalar
Delphide yaptığım projede ders çakışmalarını engellemek istiyorum.Yazmış olduğum kod şu:

Kod: Tümünü seç

query.SQL.Text:='SELECT * FROM ders_saat WHERE gun='+
                 quotedstr(dersler.gun.Items[dersler.gun.ItemIndex])+
                 ' and #'+dersler.bs_saat.Text+'#'+
                 ' between baslangic_saat and bitis_saat';

aldığım hata ise
Parametre nesnesi hatalı tanımlanmış.Uyumsuz veya eksik bilgiler girilmiş.

ortaya çıkan string ifadede hata olabilir mi diye düşündüm.Sql ifadesini edit kutusuna gönderdim:

Kod: Tümünü seç

SELECT * FROM ders_saat WHERE gun='Pazartesi' and #12:00# between baslangic_saat and bitis_saat

Ortaya çıkan ifadeyi access'e yazınca çalıştırıyor.Ama delphi çalıştırmıyor.
Aynı şekilde Delphi short time alanlarını Dbgrid içerisinde

Kod: Tümünü seç

12/30/1899 10:00:00

şeklinde görüyor.Bu şekildede denedim aynı hatayı verdi.

Şimdiden sağolun.