Deleting records according to certain criteria

I tried looking online but no luck How can I delete all entries in the adotable on button click that match different criteria. For example, I want to be able to delete all records in an adotable where Labour_ID (this is the name of the field inside the adotable) is DBedit.Text.

sorry this is a little vague, but suggestions would be appreciated. thank


source to share

1 answer

You can delete lines with a simple loop:

while ADOTable1.Locate('Labour_ID', Edit1.Text, []) do


Better still use TADOQuery, and do it using SQL:

ADOQuery1.SQL.Text := 'DELETE FROM YourTable WHERE Labour_ID = :Labour_ID';
ADOQuery1.Params.ParamByName('Labour_ID').AsString := Edit1.Text;


For the last parameter, LocateOptions

see the Delphi documentation on TDataSet.Locate . (Link to XE2 docs, but it hasn't changed much (if at all) for ADO since D7).



All Articles