access db den tarihe göre sorgulama yapmak

[forumsad]

Kod: Tümünü seç

procedure kacKisiOynamisHesapla;
begin
DMveriTabani.DataSource1.DataSet:=DMveriTabani.ADOQuery1;
//çalışma anında sorgulama yapabilmek için verileri data sete atarız
FrmVeriTabani.DBGrid1.DataSource:=DMveriTabani.DataSource1;



DMveriTabani.ADOQuery1.Close;
DMveriTabani.ADOquery1.SQL.Clear;
DMveriTabani.ADOQuery1.SQL.Add('select * from Oyunlar where OyunAcilis=tar1');
DMveriTabani.ADOQuery1.Parameters.ParamByName('tar1').Value:=DateTimeToStr(Now);
DMveriTabani.ADOQuery1.Open;
end;

yukardaki kod ile bugün oynanan oyunların kayıtlarını adotable içinde göstermek istiyorum ama olmuyor 
yardımcı olurmusunuz

teşekkürler

[orhancc]

Hata mı geliyor nedir sorun ?

[unicorn64]

muhtemelen çevrim hatası alıyorsunuz. OyunAcilis alanının tipi nedir?
tarihi stringe çevirip kullanmak yerine veritabanı tarafında alanı tarih yapıp delphi tarafından da doğrudan tarih olarak parametre geçmeyi deneyin...

[forumsad]

Kod: Tümünü seç

procedure kacKisiOynamisHesapla;
begin
DMveriTabani.DataSource1.DataSet:=DMveriTabani.ADOQuery1;
//çalışma anında sorgulama yapabilmek için verileri data sete atarız
FrmVeriTabani.DBGrid1.DataSource:=DMveriTabani.DataSource1;

DMveriTabani.ADOQuery1.Close;
DMveriTabani.ADOquery1.SQL.Clear;
DMveriTabani.ADOQuery1.SQL.Add('select * from Oyunlar where TarihRapor=tar1');
DMveriTabani.ADOQuery1.Parameters.ParamByName('tar1').Value:=DateToStr(Date);
DMveriTabani.ADOQuery1.Open;
end;

yukardaki şekilde oldu

teşekkürler