Solução para botão

olá pessoal, tenho um form com vários dbEdits, e para cada dbEdit estou utilizando um edit normal para inserir um valor decimal e mais dois botões, um de multiplicar e outro de dividir, para realizar a operação entre o dbEdit e o edit normal, o meu problema está em pegar a ação do botão escolhido e mudar o valor contido no dbedit..........qual procedimento me ajudaria neste caso.

Código:

procedure TformResumo.dbISChange(Sender: TObject); var valorBase, valorRef, resultado : real; begin valorBase := retornaTotal(dbIS.Text); valorRef := retornaTotal(edtIS.Text); if btnVezes then //Aqui está a duvida begin resultado := valorBase * valorRef; dbIS.Text := FloatToStr(resultado); end else begin if btnDividir then //Aqui está a duvida begin resultado := valorBase / valorRef; dbIS.Text := FloatToStr(resultado); end; end; end; inherited; end;