Creando Consulta de alquiler

[nemesio]

Qué tipo de campo es "Telefono"? StrToInt te muestra el error porque estas tratando de convertir a entero una cadena no válida. Recuerda que las cantidades válidas no tienen caracteres especiales a menos que sea el símbolo de negativo antes de la cantidad o el separador decimal. Por lo tanto si quieres guardar el número telefónico sin tener problemas, el campo debería ser string y debes quitar el StrToInt.

[[enecumene]]

hola nemesio, ya pude resolver el problema este es el codigo:

Código Delphi [-]
procedure TAlquiler.MaskEdit1KeyPress(Sender: TObject; var Key: Char);
begin
if Key=#13 then begin
  qryCliente.Close;
  qryCliente.SQL.Add(' SELECT telefono1_cliente, nombre_cliente, apellidos_cliente FROM tbClientes ');
  qryCliente.SQL.Add('WHERE telefono1_cliente = :telefono');
  qryCliente.Parameters.ParamByName('telefono').Value:=MaskEdit1.Text;
  qryCliente.Open;
  if not qryCliente.IsEmpty then begin
    DBText1.Caption:=qryClientenombre_cliente.Value+''+qryClienteapellidos_cliente.Value;
    Edit2.SetFocus;
    end
  else
    ShowMessage('Cliente no existe')
  end; //if cliente is not empty
end;

pero ahora sucede que ocurre otro error, cuando digito un telefono me sale el nombre en el dbtext, perfecto hasta ahi todo bien, pero supongamos que ese no era el telefono que no queria, limpio la casilla para digitar otro telefono, y me sale este error:

EOleException with message 'OLE error 800A0E7C'

y ahora que sera??

gracias...

[[enecumene]]

ya pude resolver el problema habia que ponerle sql.clear, gracias a todos, por ayudarme..