Einzelnen Beitrag anzeigen

mkinzler
(Moderator)

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

Re: Alle Datensätze mit veraltetem Datum löschen

  Alt 30. Jul 2009, 14:20
Delphi-Quellcode:
While not Table.Eof do
begin
    if Table1.FieldByName('Datum').Value < Now then Table1.Delete else Table.Next;
end;
Markus Kinzler
  Mit Zitat antworten Zitat