Fórum SQL com INNER JOIN com gt;= 2 Registro #277348

Tenho 2 Tabelas Padadox uma CdCliente e a outra CdTurma Já fiz INNER JOIN esta tudo ok O que eu quero e que so me traga os registro que constarem na tabela CdTurma dois registro ou mais do mesmo Cliente ex

CódigoCliente
01Fafa de Belem
02Roberto Carlos
03Teste Teste

CódigoTurma
01Teatro
01Português
02Teatro
03Inglês
02Francês

na verdade a Query tem que retornar somente a união INNER JOIN dos dados 01 e 02 que contem mais de um registro muito obrigada
Ex: do código que não esta correto e eu não sei o que esta de errado.

DM.QLivre1.Close;
DM.QLivre1.SQL.Clear;
DM.QLivre1.SQL.Text :=´select ´+
´T1.Grupo, T1.Modalidade,
T1.Valor,T1.RecCliSituacao, ´+
´T2.CdAlCliente,T2.CliTiNacido, T2.CliTitular,
T2.CliSituacao, T2.CliFone,
T2.CliFoneCelular, ´+
´COUNT(T1.RecCdAlCliente)as Teste ´+
´from ´+
´CdModalidadeValor T1 ´+
´INNER JOIN ´+
´CdCliente T2 ON (T2.CdAlCliente =
T1.RecCdAlCliente) ´+
´WHERE ´+
´T2.CliSituacao = ´´+ComboBox1.Text+´´ ´+
´group by ´+
´T1.RecCdAlCliente, T1.Grupo, T1.Modalidade,
T1.Valor, T1.RecCliSituacao, ´+
´T2.CdAlCliente, T2.CliTiNacido, T2.CliTitular,
T2.CliSituacao, T2.CliFone, T2.CliFoneCelular ´+
´having Count(T1.RecCdAlCliente)>=2 ´;
DM.QLivre1.Prepare;
DM.QLivre1.Open;