Einzelnen Beitrag anzeigen

mkinzler
(Moderator)

Registriert seit: 9. Dez 2005
Ort: Heilbronn
39.858 Beiträge
 
Delphi 11 Alexandria
 
#15

AW: neuere Datzensätze fehlen beim Abfragen

  Alt 15. Mai 2017, 16:48
Oder noch besser:

Delphi-Quellcode:
 DataModule_DB.ZQuery.SQL.Text := 'SELECT DATUM, UHRZEIT, TEMPSENSOR_1, FEUCHTESENSOR_1 FROM Wetterdaten WHERE (:Alle = 1 or DATUM = :DATE) ORDER BY UHRZEIT';
...
if alle_Datensaetze then
 begin
    DataModule_DB.ZQuery.ParamByName('alle').Value := 1;
 end
 DataModule_DB.ZQuery.ParamByName('DATE').AsDate := Datum;
 DataModule_DB.ZQuery.Open;
Markus Kinzler
  Mit Zitat antworten Zitat