Einzelnen Beitrag anzeigen

Benutzerbild von Helmi
Helmi

Registriert seit: 29. Dez 2003
Ort: Erding, Republik Bayern
3.336 Beiträge
 
Delphi XE2 Professional
 
#1

neuere Datzensätze fehlen beim Abfragen

  Alt 14. Mai 2017, 20:54
Datenbank: Firebird • Version: 2.5 • Zugriff über: ZEOS
Hallo,

mit folgendem Code frag ich Datensätze ab:
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;
Dies funktioniert genau 1x.
Alle paar Minuten kommt ein neuer Datensatz in die Datenbank.
Frag ich danach mit dem o. g. Code wieder ab, so fehlt der neue Datensatz.

Erkennen tu ich es in einem DBGrid, dass der Eintrag fehlt.

Das DBGrid wird vom ZQuery versorgt.

Was mach ich falsch, bzw. wie bekomm ich die anderen, neueren Datensätze?
mfg
Helmi

>> Theorie ist Wissen, dass nicht funktioniert - Praxis ist, wenn alles funktioniert und keiner weiss warum! <<
  Mit Zitat antworten Zitat