Einzelnen Beitrag anzeigen

Benutzerbild von MrSpock
MrSpock
(Co-Admin)

Registriert seit: 7. Jun 2002
Ort: Owingen
5.865 Beiträge
 
Delphi 2010 Professional
 
#4
  Alt 6. Aug 2002, 20:03
Hallo m-werk,

dazu könntest du in der AfterDelete (oder BeforeDelete) Methode ein SQL Statement einer TQuery Komponente ausführen:

Code:
DELETE FROM Tabelle2 WHERE KNr = :KNr
Durch den Doppelpunkt vor dem KNr wird ein Parameter erzeugt, den du z.B. über ParamByName zugreifen kannst:

Code:
DelQry.ParamByName('KNr').AsString := KundenNr;
DelQry.ExexSQL;
ShowMessage(IntToStr(DelQry.RowsEffected)+' Datensätze gelöscht.');
Dabei ist DelQry der Name der Lösch TQuery, KundenNr die zu löschende Kundennummer als String.

Übrigens liefert RowsEffected die Anzahl der betroffenen Datensätze.
Albert
Live long and prosper


MrSpock
  Mit Zitat antworten Zitat