problemas con parametros en adoquery

[elsamurai]

saludos,gracias por responderme,mira modifique mi consulta y puse

Código SQL [-]
select * from cliente where nombre=:variable

le puse el nombre de variable a mi parametro y en el codigo del boton tengo esto

Código Delphi [-]
with  dm.ADOfactura do
begin
 close;
parameters.ParamByName('nombre').Value:=variable ;
  open;
     if IsEmpty then
      begin
        ShowMessage('Registro no existe...');
        exit;
      end;
end;
rptfactura.quickrep1.preview;
rptfactura.close;

cuando lo intento ejecutar me dice un error que dice que la palabra variable no esta declarada,que crees que pueda ser ?

[rgstuamigo]

Empezado por elsamurai

cuando lo intento ejecutar me dice un error que dice que la palabra variable no esta declarada,que crees que pueda ser ?

Debes entender que si has creado un parametro de nombre "variable" en tu consulta SQL

Código SQL [-]
select * from cliente where nombre=:variable  <--  

entonces debes buscarlo con ese mismo nombre >

Código Delphi [-]
with  dm.ADOfactura do
begin
 close;
parameters.ParamByName('variable').Value:=variable ;//<--en esta linea estaba tu error 
...
...

Saludos...

[elsamurai]

mira probe lo que me dices,puse lo siguiente

Código Delphi [-]
with  dm.ADOfactura do
begin
 close;
parameters.ParamByName('variable').Value:= variable ;
  open;
     if IsEmpty then
      begin
        ShowMessage('Registro no existe...');
        exit;
      end;
end;
rptfactura.quickrep1.preview;
rptfactura.close;

y todavia me dice que variable esta sin declarar

[rgstuamigo]

Empezado por elsamurai

mira probe lo que me dices
...
...
y todavia me dice que variable esta sin declarar

Haber...Pusiste la consulta SQL en la propiedad SQL de tu DataSet (ADOQuery)?
Por que si no has puesto pues estamos fritos.; Humm...bueno en todo caso lo vamos a poner por código>

Código Delphi [-]
with dm.ADOfactura do
begin
 Close;
 SQL.Text:='select * from cliente where nombre = :variable';//añado mi consulta SQL que quiero ejecutar
 Parameters.ParamByName('variable').Value:=Edit1.Text;// Asigno lo que tengo e mi Edit a mi parámetro de nombre "Variable"
 Open;
   if IsEmpty then
    begin
     ShowMessage('Registro no existe...');
     exit;
    end;
...
...

Saludos...

[elsamurai]

muchas gracias rgstuamigo,el codigo que me diste me sirvio mucho y me saco de una gran duda que tenia desde hace tiempo,espero que este tema le pueda servir a otros como me sirvio a mi,gracias de nuevo,asi es como deje el codigo final

Código Delphi [-]
with dm.ADOfactura do
begin
 Close;
 SQL.Text:='select * from clientes where nombre = :variable';//añado mi consulta SQL que quiero ejecutar
 Parameters.ParamByName('variable').Value:=dbedit1.Text;;// Asigno lo que tengo e mi Edit a mi parámetro de nombre "Variable"
 Open;

rptfactura.quickrep1.preview;
rptfactura.close;
  end
end;

end.