Einzelnen Beitrag anzeigen

Major1337

Registriert seit: 26. Jul 2009
158 Beiträge
 
#37

Re: SQL Abfrage - Datum zwischen X und Y

  Alt 17. Sep 2009, 10:31
@DeddyH

ich weiß doch wie das Programm ablaufen soll da brauch ich keinen Programmablauf o.O.


Datum von: (DateBeginSucheEdit)

Datum bis: (DateEndSucheEdit)

1. Fall
Eingabe von DateBeginSucheEdit; DateEndSucheEdit keine Eingabe
=> Zeigt alle Datensätze mit Datum von Eingabe DatebeginSucheEdit an,
DateEndSucheEdit bekommt Caption von Eingabe DateBeginSucheEdit

2. Fall
2. Eingabe von DateEndSuchEdit; DateBeginSucheEdit keine Eingabe
=> Zeigt alle Datensätze mit Datum von Eingabe DatebeginSucheEdit an,
DateBeginSucheEdit bekommt Caption von Eingabe DateEndSucheEdit

3. Fall
3. Eingabe von DateBeginSucheEdit und DateEndSucheEdit
=> Zeigt alle Datensätze an die zwischen DateBeginSuchEdit und DateEndSucheEdit stehen



Delphi-Quellcode:
if DateBeginSucheEdit.text <> 'then
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 = :ANFANG');
    DateEndSucheEdit.Text := DateBeginSucheEdit.Text;
    SmartQuery1.ParamByName('ANFANG').Value := StrToDate(DateBeginSucheEdit.Text);
  end
end;

  SmartQuery1.open;
end;

Dieser Quellcode zeigt mir Fall 1. und 3. an.. ich weiß nur nicht wie ich den 2. Fall unterbekomme.
  Mit Zitat antworten Zitat