Como usar a propriedade CommandText da classe TSQLDataSet para definir os comandos SQL a serem executados

procedure TForm3.Button1Click(Sender: TObject);
begin
  // vamos definir o comando SQL a ser executado
  SQLDataSet1.CommandText := 'DELETE FROM contatos WHERE id = ''4''';

  // vamos executar o comando
  SQLDataSet1.ExecSQL(True);

  // vamos mostrar uma mensagem indicando o sucesso da operação
  ShowMessage('Comando SQL executado com sucesso.');
end;

procedure TForm3.Button1Click(Sender: TObject);
var
  id: Integer;
begin
  id := 6; // id do registro a ser excluído

  // vamos definir o comando SQL a ser executado
  SQLDataSet1.CommandText := 'DELETE FROM contatos WHERE id = :id';
  SQLDataSet1.Params[0].Name := 'id';
  SQLDataSet1.Params[0].Value := id;

  // vamos executar o comando
  SQLDataSet1.ExecSQL(False);

  // vamos mostrar uma mensagem indicando o sucesso da operação
  ShowMessage('Comando SQL executado com sucesso.');
end;