Consulta Select con if

[giantonti]

funciona perfecta la solucion de al gonzalez, sin embargo sucede que cuando ejecuto el select y la condicion cumple con el "if" me muestra todo lo que esta en la tabla y yo quiero que me muestre solo la conulta

Código Delphi [-]
adoQuery3.SQL.Text := 'Select * From mov where cod_cli = '+QuotedStr (ADOQuery1rif.AsString);