Código Delphi [-] adoquery1.Close; adoquery1.SQL.Clear; adoquery1.SQL.Text:='select * from compras where numreferencia = :Num'; adoquery1.Parameters[0].value:= edit1.text; adoquery1.Open;
adoquery1.Close; adoquery1.SQL.Clear; adoquery1.SQL.Text:='select * from compras where numreferencia = :Num'; adoquery1.Parameters[0].value:= edit1.text; adoquery1.Open;