Thema
:
Delphi
SQL Abfrage - Datum zwischen X und Y
Einzelnen Beitrag anzeigen
Major1337
Registriert seit: 26. Jul 2009
158 Beiträge
#
35
Re: SQL Abfrage - Datum zwischen X und Y
17. Sep 2009, 10:43
Mein Vorschlag wäre:
zusammenfalten
·
markieren
Delphi-Quellcode:
if
DateBeginSucheEdit.text <> '
'
then
SmartQuery1.SQL.Add('
and datum = :ANFANG
');
DateEndSucheEdit.Text := DateBeginSucheEdit.Text;
SmartQuery1.ParamByName('
ANFANG
').Value := StrToDate(DateBeginSucheEdit.Text);
begin
if
DateEndSucheEdit.Text <> '
'
then
begin
SmartQuery1.SQL.Add('
and datum >= :ANFANG and datum <= :ENDE
');
SmartQuery1.ParamByName('
ANFANG
').Value := StrToDate(DateBeginSucheEdit.Text);
SmartQuery1.ParamByName('
ENDE
').Value := StrToDate(DateEndSucheEdit.Text);
end
else
begin
SmartQuery1.SQL.Add('
and datum = :ENDE
');
DateBeginSucheEdit.Text := DateEndSucheEdit.Text;
SmartQuery1.ParamByName('
ENDE
').Value := StrToDate(DateEndSucheEdit.Text);
end
end
;
klappt aber nicht ^^
Zitat
Major1337
Öffentliches Profil ansehen
Mehr Beiträge von Major1337 finden