Comparar DBEdit con un campo

[DOS]

Empezado por Casimiro Notevi

¿Dónde sale ese error?

Cuando apreto el boton imprimir.
Probe este codigo, reemplazando la clave principal por el apellido que esta en el DBEdit3 y funciona perfectamente haciendo lo que necesito, el asunto es que lo tengo que realizar con la clave principal(DBEdit1) ya que el apellido se puede repetir varias veces

Código Delphi [-]
procedure TForm6.SpeedButton1Click(Sender: TObject);
var
Valor:string;
begin
Valor:=DBEdit3.Text;
with Form26.Query1 do
  begin
    Close;
    SQL.Clear;
    SQL.Add('SELECT * FROM propietario');
    SQL.Add('WHERE ApellidoP = :PValor');
    ParamByName('PVALOR').AsString := 'Valor';
    Open;
  end;
Form26.QuickRep1.Preview; // Previsualizar los resultados.
end;

Sin dudas tiene que ver con el tipo de datos a comparar, Cod_prop es numerico y la variable es txt, se deberia pasar en algun momento a integer o float ¿no?