neuere Datzensätze fehlen beim Abfragen

[haentschman]

Hallo Helmi...
Ich gebe noch nicht auf, daß du siehst das WITH schlecht ist.

Vergleich:

Delphi-Quellcode:

//Filter setzen
  with DataModule_DB.ZQuery do
    begin
      Close;
      SQL.Clear;
      SQL.Add('SELECT DATUM, UHRZEIT, TEMPSENSOR_1, FEUCHTESENSOR_1 FROM Wetterdaten ');
      If not alle_Datensaetze then
        SQL.Add('WHERE DATUM = :DATE');
      SQL.Add('ORDER BY UHRZEIT');
      //Parameter
      If not alle_Datensaetze then
        ParamByName('DATE').AsDate := Datum;
      Open;
    end;

gegen...

Delphi-Quellcode:

//Filter setzen
 DataModule_DB.ZQuery.SQL.Text := 'SELECT DATUM, UHRZEIT, TEMPSENSOR_1, FEUCHTESENSOR_1 FROM Wetterdaten ';
 if not alle_Datensaetze then
 begin 
   SQL.Add('WHERE DATUM = :DATE');
   DataModule_DB.ZQuery.ParamByName('DATE').AsDate := Datum;
 end;
 DataModule_DB.ZQuery.SQL.Add('ORDER BY UHRZEIT');
 DataModule_DB.ZQuery.Open;

..merkst du was? Du machst es dir schwerer als notwendig ist. Mit dem WITH kannst außerdem du nicht mehr debuggen! ParamByName('DATE').AsDate bringt kein Ergebnis am Breakpoint. Und außerdem brauchst du mehr Quelltextzeilen.

Wenn du dir nicht helfen lassen willst bin ich hier raus. Ansonsten frage nach...