Justo antes del ADOQuery3.ExecSQL coloca la línea:
Código Delphi
[-]
ShowMessage(ADOQuery3.SQL.Text);
Esto te mostrará como queda el texto final de la consulta SQL. Muy posiblemente así te des cuenta de donde está el error (que generalmente se debe a que los valores del los Edits no son lo que uno piensa). Si aún así no percibes la causa, coloca aquí el texto del ShowMesaage para que podamos examinarlo.
Otra cosa: en lo sucesivo te pido que uses las etiquetas [delphi] para publicar código delphi tal como he hecho yo por tí en esta ocasión.
// Saludos