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...