Código Delphi [-] ...... SQL:= 'SELECT * FROM consultacliente WHERE codigo =' +EDIT1.TEXT ......
...... SQL:= 'SELECT * FROM consultacliente WHERE codigo =' +EDIT1.TEXT ......