Nach leeren Feldern suchen

[marabu]

Hallo,

beim Zugriff auf Datumsfelder unter dBase muss bei LocalSQL mit NULL gearbeitet werden, auch wenn dBase selbst in den meisten Versionen gar keine Null-Werte unterstützt.

Wenn die Sätze ohne Datumsangabe zusammen mit den gefilterten Sätzen in der Ergebnismenge auftauchen sollen, dann muss die Where-Klausel erweitert werden:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
  with Query1 do
  begin
    Sql.Text := 'SELECT firma, wvzeit, wvkontakt FROM succ1 WHERE wvkontakt <= :edatum '
        + 'OR wvkontakt IS NULL ORDER BY wvkontakt DESC';
    ParamByName('edatum').Value := Date();
    Open;
    while not Eof do
    begin
      if FieldByName('wvkontakt').IsNull 
        then { ... }
        else { ... };
      Next;
    end;
    Close;
  end;
end;

Da sich das SQL-Statement nicht ändert, würde ich es nur einmal im OI eintragen.

Grüße vom marabu