Comparar DBEdit con un campo

[DOS]

Hola a todos, resulta que tengo un formulario en donde muestro datos de una tabla a traves de un DBGrid y DBEdit por cada campo, que utilizo para cargar los datos y me muevo con un navegador. Ahora puse un boton para realizar un QReport (en otro formulario), la idea es que cuando mando a imprimir el reporte solo me muestre los datos relativos a la clave principal que esta seleccionada en el DBEdit.
Intente con el siguiente codigo del boton imprimir, se muestra otra opcion tambien en la misma //.

Código Delphi [-]
procedure TForm6.SpeedButton1Click(Sender: TObject);
//Var
// a:integer;
begin
//a:=strtoint(DBEdit1.Text);

  with Form26.Query1 do
  begin
    Close;
    SQL.Clear;
    SQL.Add('SELECT * FROM propietario');
    SQL.Add('WHERE Cod_prop = : (DBEdit1.text)'); //Deberia comparar elcodigo de la tabla con el que muestra el DBEdit
   // SQL.Add('WHERE Cod_prop = : a');
    Open;
    end;
Form26.QuickRep1.Preview; // Previsualizar los resultados.
end;

Es como para imprimir una ficha, solo necesito los datos del propietario seleccionado, ambas codificaciones no funcionaron, no creo estar muy lejos.
Tengo Delphi7 y las tablas estan hechas en Paradox (si ya se no coment)
Gracias.

[Casimiro Notevi]

No se entiende (yo no lo entiendo) lo que dices, ni el problema, ni lo que estás haciendo, ni lo que quieres

[ecfisa]

Hola DOS.

Yo tampoco entiendo la explicación del problema, pero si tenes el código tál cuál lo mostras en el mensaje no te va a funcionar.

Debería ser algo como:

Código Delphi [-]
  with Form26.Query1 do
  begin
    Close;
    SQL.Clear;
    SQL.Add('SELECT * FROM PROPIETARIO');
    SQL.Add('WHERE COD_PROP = :PVALOR');
    ParamByName('PVALOR').AsString := DBEdit1.Text;
    Open;
  end;

Saludos

[Casimiro Notevi]

Vaya, cuando yo vi el mensaje no había código alguno, debo estar más cegato de lo que pensaba

[ecfisa]

Empezado por Casimiro Notevi

...debo estar más cegato de lo que pensaba

No lo creo , con toda seguridad lo haya agregado luego de tu respuesta...

Saludos

[Caminante]

El DBEdit1 a que dataset esta ligado?? porque si es al mismo query tampoco va a funcionar ya que cierras el dataset para asignar el SQL. En tal caso primero guardaria el valor en una variable.

Código Delphi [-]
var
 Valor:string;
begin
with Form26.Query1 do
  begin
    Valor:=DBEdit1.Text;
    Close;
    SQL.Clear;
    SQL.Add('SELECT * FROM PROPIETARIO');
    SQL.Add('WHERE COD_PROP = :PVALOR');
    ParamByName('PVALOR').AsString := Valor;
    Open;
  end;
end;

Espero te sirva.

Saludos