Select Sum

Boa Tarde amigos,

Estou a dias tentando resulver um probleminha, mas não estou conseguindo.

Preciso que por um Edit, digito o numero do contrato e em um dbgrid mostre as informações somente do contrato digitado e em um Edit mostre a soma_HoraMontagem.

Meu codigo ficou assim:

with DataModule1.ZQ_LancamentoHoras do
Begin

 active := true;
 close;
 sql.Clear;
 sql.Add(' Select * from apontamento(char(39)Select sum(apont_hfabricacao) from apontamento where cont_numero = char(39)+Edit_consulta_contrato.Text)');

 open;
 

 

 

 

Esta dando erro se Sintaxe no Select

Não estou conseguindo acertar o codigo.

Executará o código em um Button

Obrigado a todos.