Mit einer
Query sieht das ganz grob so aus:
Delphi-Quellcode:
query.SQL.Text := '
SELECT COUNT(*) AS Anzahl FROM DOCUMENTS';
query.SQL.Add('
WHERE CUSTOMER = '+QuotedStr(inttostr(CustomerID))+'
AND MODIFYDATE = '+QuotedStr(DateTimetoStr));
ShowMessage(
query.SQL.Text);
// zum Debuggen die SQL-Abfrage anzeigen
query.open;
result :=
query.Fields[0].AsInteger <> 0;
Das lässt sich mit Parametern noch verbessern sollte so aber auch funktionieren.