begin
if datamodule.adoquery.isempty then exit
else
datamodule.adoquery.delete
end;
end.