Como fazer para apagar dados em duas tabelas?

Amigos,          Como fazer o codigo para apagar o Aluno da tabela ALUNOTURMA e também apagar as notas referente as este aluno da tabela NOTAS, lembro que na tabela ALUNOTURMA tem o campo MATRICULA_ALUNO e na tabela NOTAS tem o campo MATRICULA_ALUNO_NOTAS os quais guardão a matricula do aluno, abaixo tenho o codigo que já está apagando o aluno. Mazo.
procedure TFrmCadTurDisc.BtnExcluirAlunoClick(Sender: TObject);
begin
        if not DmDados.IBQryAlunoTurma.IsEmpty then
  begin
    if Mensagem('Tem Certeza Que Deseja Excluir o Aluno da Turma?') then
    begin
       DmDados.IBQryAlunoTurma.Delete;        DmDados.IBQryAlunoTurma.Close;
       DmDados.IBQryAlunoTurma.Open;
    end;
  end
  else
    ShowMessage('Não existe nenhum Aluno na Turma para apagar!'); end;