Executing simple 'Delete' statement using ADO Command object

I'm using Delphi 2006 Architect, but what I'm trying to do has been around for years - I'm just not familiar with how to get it done (and I've been frustrated all day trying to get this done).

I have a service application which is reading through a set of records from a SQL Server table.  That works great.  

At the end of the program logic, I want to delete all the records I just stepped through.  I'm marking them with a value as I go.

Here's my code:

  lRecsAffected := 0;
  ADOCommand := CoCommand.Create;
  ADOCommand._Set_ActiveConnection(FConnectionString);
  ADOCommand.CommandText := 'Delete from CalendarLog where Operation = ''DELETE''';
  ADOCommand.CommandType := adCmdText or adExecuteNoRecords;
  ADOParameter := ADOCommand.CreateParameter('ADOParameter', adEmpty, adParamInput, 0, 0);
  ADOCommand.Execute(lRecsAffected, ADOParameter, adCmdText or adExecuteNoRecords);

lRecsAffected is defined as OleVariant, and so is ADOParameter.  ADOCommand is _Command.

I would rather not have anything to do with the Parameter object, but I'm assuming it's a necessary evil at this point.  All I want to do is execute my delete statement.  Help!