Utilize um filtro no controle DataEnvironment, passando como parâmetro o campo que vc deseja, antes de usar o codigo que abre o relatorio, exemplo:
DataEnvironment1.rsCommand1.Filter = "campodata >= '" & Txtdatainicial & "' and campodata <= '" & Txtdatafinal & "'"
rpt.Show

em seu caso faça o filtro pelo nome do cliente que aparece na combo

 

Dataenvironment1.rscommand1.filter = "Nome like '" & combo_cliente & "'"

Datareport1.show

 

'troque o nome do campo da tabela e o nome da combo para os nomes dos seus controles

 

qaulquer dúvida...